diff options
Diffstat (limited to 'Assistant/NetMessager.hs')
| -rw-r--r-- | Assistant/NetMessager.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/NetMessager.hs b/Assistant/NetMessager.hs index 97d17af6e..fd320b00b 100644 --- a/Assistant/NetMessager.hs +++ b/Assistant/NetMessager.hs @@ -110,8 +110,8 @@ queueNetPushMessage m@(Pushing clientid stage) = do case v of Nothing -> return False (Just runningclientid) - | runningclientid == clientid -> queue nm | isPushInitiation stage -> defer nm + | runningclientid == clientid -> queue nm | otherwise -> discard where side = pushDestinationSide stage |