mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

more Wall cleaning

Browse source
This commit is contained in:
Joey Hess 2010-10-31 16:00:32 -04:00
parent b2c28c1ac0
commit cf4c926f2e
8 changed files with 23 additions and 32 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Core.hs
View file

@ -109,7 +109,7 @@ calcGitLink file key = do
Just f -> f
Nothing -> error $ "unable to normalize " ++ file
return $ (relPathDirToDir (parentDir absfile) (Git.workTree g)) ++
annexLocationRelative g key
annexLocationRelative key
{- Updates the LocationLog when a key's presence changes. -}
logStatus :: Key -> LogStatus -> Annex ()