assistant: Fix syncing after XMPP pairing.

A missing uuid broke this, and also caused a UI glitch in the webapp's
remote list.

1 files changed, 6 insertions, 1 deletions

diff --git a/Assistant/XMPP/Git.hs b/Assistant/XMPP/Git.hs
index bdb68eea1..0a452154b 100644
--- a/Assistant/XMPP/Git.hs
+++ b/Assistant/XMPP/Git.hs
@@ -25,6 +25,8 @@ import Git
 import qualified Git.Branch
 import Locations.UserConfig
 import qualified Types.Remote as Remote
+import qualified Remote as Remote
+import Remote.List
 import Utility.FileMode
 import Utility.Shell
 
@@ -53,7 +55,10 @@ makeXMPPGitRemote buddyname jid u = do
 	remote <- liftAnnex $ addRemote $
 		makeGitRemote buddyname $ gitXMPPLocation jid
 	liftAnnex $ storeUUID (remoteConfig (Remote.repo remote) "uuid") u
-	syncNewRemote remote
+	liftAnnex $ void remoteListRefresh
+	remote' <- liftAnnex $ fromMaybe (error "failed to add remote")
+		<$> Remote.byName (Just buddyname)
+	syncNewRemote remote'
 	return True
 
 {- Pushes over XMPP, communicating with a specific client.