diff options
Diffstat (limited to 'Assistant/Pushes.hs')
| -rw-r--r-- | Assistant/Pushes.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Pushes.hs b/Assistant/Pushes.hs index 9765b6a42..54f31a84b 100644 --- a/Assistant/Pushes.hs +++ b/Assistant/Pushes.hs @@ -33,7 +33,7 @@ changeFailedPushMap a = do v <- getAssistant failedPushMap liftIO $ atomically $ store v . a . fromMaybe M.empty =<< tryTakeTMVar v where - {- tryTakeTMVar empties the TMVar; refill it only if + {- tryTakeTMVar empties the TMVar; refill it only if - the modified map is not itself empty -} store v m | m == M.empty = noop |