mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix murderous typo

Browse source
This commit is contained in:
Joey Hess 2012-11-09 17:33:34 -04:00
parent 47c032a748
commit 1deda1db13
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Assistant/XMPP.hs
View file

@ -182,7 +182,7 @@ decodeSendPackOutput t m = SendPackOutput
<*> decodeTagContent t <*> decodeTagContent t
receivePackDone :: ExitCode -> JID -> JID -> Message receivePackDone :: ExitCode -> JID -> JID -> Message
receivePackDone = gitAnnexMessage . gitAnnexTag receivePackAttr . T.pack . show . toi receivePackDone = gitAnnexMessage . gitAnnexTag receivePackDoneAttr . T.pack . show . toi
where where
toi (ExitSuccess) = 0 toi (ExitSuccess) = 0
toi (ExitFailure i) = i toi (ExitFailure i) = i