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

reap in onLocal

Browse source 
Each onLocal call involves a new Annex state, so needs to clean up after it.
This commit is contained in:
Joey Hess 2011-10-27 14:48:53 -04:00
parent c30366e95a
commit f84d66fa15
3 changed files with 9 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Remote/Git.hs
View file

@ -157,7 +157,9 @@ onLocal r a = do
-- No need to update the branch; its data is not used
-- for anything onLocal is used to do.
Annex.Branch.disableUpdate
a
ret <- a
liftIO $ Git.reap
return ret
keyUrl :: Git.Repo -> Key -> String
keyUrl r key = Git.repoLocation r ++ "/" ++ annexLocation key