[remove unneeded instances in Logger
Helmut Grohne <grohne@cs.uni-bonn.de>**20140717123954
 Ignore-this: bc53f7679628a8ac6efbea0a29ef14ca
] hunk ./src/Igor2/Logging/Logger.hs 33
-import Control.Monad.Writer.Strict (MonadWriter(..), WriterT, Writer(..), runWriter, runWriterT, )
+import Control.Monad.Writer.Strict (MonadWriter(tell), WriterT, Writer(..), runWriter, runWriterT)
hunk ./src/Igor2/Logging/Logger.hs 106
-getPriority ::  (MonadState LogState m, MonadWriter Log m) => m Priority
+getPriority ::  (MonadState LogState m) => m Priority
hunk ./src/Igor2/Logging/Logger.hs 109
-setPriority ::  (MonadState LogState m, MonadWriter Log m) =>Priority -> m ()
+setPriority ::  (MonadState LogState m) =>Priority -> m ()
hunk ./src/Igor2/Logging/Logger.hs 112
-isVerbose :: (MonadState LogState m, MonadWriter Log m) =>m Bool
+isVerbose :: (MonadState LogState m) =>m Bool
hunk ./src/Igor2/Logging/Logger.hs 115
-setVerbose ::  (MonadState LogState m, MonadWriter Log m) =>Bool -> m ()
+setVerbose ::  (MonadState LogState m) =>Bool -> m ()
hunk ./src/Igor2/Logging/Logger.hs 118
-isDumping :: (MonadState LogState m, MonadWriter Log m) =>m Bool
+isDumping :: (MonadState LogState m) =>m Bool
hunk ./src/Igor2/Logging/Logger.hs 121
-setDumping ::  (MonadState LogState m, MonadWriter Log m) =>Bool -> m ()
+setDumping ::  (MonadState LogState m) =>Bool -> m ()
hunk ./src/Igor2/Logging/Logger.hs 130
-handle le@(LE p msg) = 
+handle le@(LE p msg) = ELT $
hunk ./src/Igor2/Logging/Logger.hs 175
-instance Monad m => MonadWriter Log (ELT m) where
-    tell = ELT . tell
-    listen = ELT . listen . unELT
-    pass = ELT . pass . unELT
-
-instance Monad m => MonadState LogState (ELT m) where
-    get = ELT get
-    put = ELT . put
-