From daf28d5b756618290e9cf3938c4cb3f2f8f98a22 Mon Sep 17 00:00:00 2001
From: Peter Kasza <mr.schyte@gmail.com>
Date: Sat, 14 Apr 2012 20:47:05 +0200
Subject: Removed 'modifyTVar' to be compatible with STM-2.3.

---
 src/Plugins/Mail.hs | 3 ---
 xmobar.cabal        | 2 +-
 2 files changed, 1 insertion(+), 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:
-- 
cgit v1.2.3