diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-03-18 16:19:42 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-03-18 17:23:47 -0400 |
| commit | aa26294c303846f4022a8750a148863646c9fdde (patch) | |
| tree | 44d3a64c1c3c964f0bca5b56b03df53269f8fed0 /Assistant/Threads/XMPPClient.hs | |
| parent | 4d035de8f4618e1c31c837b151b7ffeced20cd3d (diff) | |
webapp: Improved alerts displayed when syncing with remotes, and when syncing with a remote fails.
Diffstat (limited to 'Assistant/Threads/XMPPClient.hs')
| -rw-r--r-- | Assistant/Threads/XMPPClient.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Threads/XMPPClient.hs b/Assistant/Threads/XMPPClient.hs index 79bb33b0e..1242c1d74 100644 --- a/Assistant/Threads/XMPPClient.hs +++ b/Assistant/Threads/XMPPClient.hs @@ -256,7 +256,7 @@ pull us = do pullone [] _ = noop pullone (r:rs) branch = - unlessM (all id . fst <$> manualPull branch [r]) $ + unlessM (null . fst <$> manualPull branch [r]) $ pullone rs branch pairMsgReceived :: UrlRenderer -> PairStage -> UUID -> JID -> JID -> Assistant () |