diff options
Diffstat (limited to 'Remote/Git.hs')
-rw-r--r-- | Remote/Git.hs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Remote/Git.hs b/Remote/Git.hs index 4285be653..fd3a61243 100644 --- a/Remote/Git.hs +++ b/Remote/Git.hs @@ -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 |