diff options
| -rw-r--r-- | Remote/Git.hs | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/Remote/Git.hs b/Remote/Git.hs index fd3a61243..b0138901d 100644 --- a/Remote/Git.hs +++ b/Remote/Git.hs @@ -190,8 +190,11 @@ copyToRemote r key let keysrc = gitAnnexLocation g key params <- rsyncParams r -- run copy from perspective of remote - liftIO $ onLocal r $ Annex.Content.getViaTmp key $ - rsyncOrCopyFile params keysrc + liftIO $ onLocal r $ do + ok <- Annex.Content.getViaTmp key $ + rsyncOrCopyFile params keysrc + Annex.Content.saveState + return ok | Git.repoIsSsh r = do g <- gitRepo let keysrc = gitAnnexLocation g key |