diff options
| -rw-r--r-- | src/Plugins/Mail.hs | 3 | ||||
| -rw-r--r-- | xmobar.cabal | 2 |
2 files changed, 1 insertions, 4 deletions
diff --git a/src/Plugins/Mail.hs b/src/Plugins/Mail.hs index 58431ce..b11b7ad 100644 --- a/src/Plugins/Mail.hs +++ b/src/Plugins/Mail.hs @@ -56,9 +56,6 @@ instance Exec Mail where | (m, n) <- zip ts ns , n /= 0 ] -modifyTVar :: TVar a -> (a -> a) -> STM () -modifyTVar v f = readTVar v >>= writeTVar v . f - handle :: TVar (Set String) -> Event -> IO () handle v e = atomically $ modifyTVar v $ case e of Created {} -> create diff --git a/xmobar.cabal b/xmobar.cabal index b08c101..0114695 100644 --- a/xmobar.cabal +++ b/xmobar.cabal @@ -107,7 +107,7 @@ executable xmobar X11 == 1.6.*, mtl == 2.0.*, parsec == 3.1.*, - stm == 2.2.* + stm == 2.3.* if flag(small_base) build-depends: |