From d82a80639dace755b6e1649dba857cc4987fae7a Mon Sep 17 00:00:00 2001 From: Douglas Warren Date: Wed, 14 Nov 2007 16:24:03 +0000 Subject: [PATCH] Removed the dependency on Control.Monad.State.Class package, since that isn't in the older Debian versions --- common/Utils.hs | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/common/Utils.hs b/common/Utils.hs index 723226c..0255cbb 100644 --- a/common/Utils.hs +++ b/common/Utils.hs @@ -21,7 +21,6 @@ with this program. If not, see . module Utils where import Control.Monad.State -import Control.Monad.State.Class import Data.Ord import System.IO import System.IO.Error @@ -142,7 +141,7 @@ powerset :: [a] -> [[a]] powerset = filterM (const [True, False]) -- | Alters a monadic state and returns the old value (from before the alteration). -modify' :: MonadState s m => (s -> s) -> m s +modify' :: Monad m => (s -> s) -> StateT s m s modify' f = do x <- get put (f x) return x