diff options
| author | Joey Hess <joey@kitenet.net> | 2014-02-24 19:40:14 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-02-24 19:40:14 -0400 |
| commit | 878e7471fa09dcc36b478e1ac1fd305d5a90b7bf (patch) | |
| tree | d552b8faa43078e3dfe1f8b10063ec566eced4e2 /Git/Objects.hs | |
| parent | d80c547a7d1261f158148ca85e627cc2ecb005f2 (diff) | |
| download | git-repair-878e7471fa09dcc36b478e1ac1fd305d5a90b7bf.tar.gz | |
merge from git-annex
Diffstat (limited to 'Git/Objects.hs')
| -rw-r--r-- | Git/Objects.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Git/Objects.hs b/Git/Objects.hs index bb492f5..516aa6d 100644 --- a/Git/Objects.hs +++ b/Git/Objects.hs @@ -32,4 +32,4 @@ listLooseObjectShas r = catchDefaultIO [] $ looseObjectFile :: Repo -> Sha -> FilePath looseObjectFile r sha = objectsDir r </> prefix </> rest where - (prefix, rest) = splitAt 2 (show sha) + (prefix, rest) = splitAt 2 (fromRef sha) |