diff --git a/Assistant/XMPP.hs b/Assistant/XMPP.hs
index 68da087a6f..02d4c10c60 100644
--- a/Assistant/XMPP.hs
+++ b/Assistant/XMPP.hs
@@ -182,7 +182,7 @@ decodeSendPackOutput t m = SendPackOutput
 	<*> decodeTagContent t
 
 receivePackDone :: ExitCode -> JID -> JID -> Message
-receivePackDone = gitAnnexMessage . gitAnnexTag receivePackAttr . T.pack . show . toi
+receivePackDone = gitAnnexMessage . gitAnnexTag receivePackDoneAttr . T.pack . show . toi
   where
 	toi (ExitSuccess) = 0
 	toi (ExitFailure i) = i