From c879eb873ec2fda1ec7d76c0de27d9ace57ba6e7 Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Thu, 27 Oct 2011 18:03:36 -0400
Subject: do commit location changes to remote in copy --to

test suite pointed out that if a file was copied from B to A, and then
A cloned, the clone ought to immediatly know it can get the file from A.
---
 Remote/Git.hs | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

(limited to 'Remote')

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
-- 
cgit v1.2.3