diff options
author | Joey Hess <joey@kitenet.net> | 2014-01-15 16:35:00 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2014-01-15 16:35:00 -0400 |
commit | 36c3e8be3aa98296eec964bba5abc96c40f41468 (patch) | |
tree | 5460eee813777d65affa4b66899e615166dd46e9 /Git/Repair.hs | |
parent | 14ce1badd4210ebb2660e0fb22ba4ff7f2986dee (diff) | |
download | git-repair-36c3e8be3aa98296eec964bba5abc96c40f41468.tar.gz |
repair: Fix bug in packed refs file exploding code that caused a .gitrefs directory to be created instead of .git/refs
Diffstat (limited to 'Git/Repair.hs')
-rw-r--r-- | Git/Repair.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Git/Repair.hs b/Git/Repair.hs index 3ae9c9f..2c09836 100644 --- a/Git/Repair.hs +++ b/Git/Repair.hs @@ -231,7 +231,7 @@ explodePackedRefsFile r = do nukeFile f where makeref (sha, ref) = do - let dest = localGitDir r ++ show ref + let dest = localGitDir r </> show ref createDirectoryIfMissing True (parentDir dest) unlessM (doesFileExist dest) $ writeFile dest (show sha) |