diff --git a/src/System/Logger/Class.hs b/src/System/Logger/Class.hs
index f0536bc0a2fb07b487375999f36c047d5fbc860f..80e4f54a9b879f4623be865b5bbb0c70a670335d 100644
--- a/src/System/Logger/Class.hs
+++ b/src/System/Logger/Class.hs
@@ -28,25 +28,20 @@ module System.Logger.Class
     )
 where
 
-import Prelude hiding (log)
-import Control.Monad.Reader
-import System.Logger (Logger, Level (..))
+import System.Logger (Level (..))
 import System.Logger.Message as M
 
 import qualified System.Logger as L
 
-class MonadIO m => MonadLogger m where
+class Monad m => MonadLogger m where
     log :: Level -> (Msg -> Msg) -> m ()
 
-instance (MonadIO m, MonadReader Logger m) => MonadLogger (ReaderT r m) where
-    log l m = lift ask >>= \g -> L.log g l m
-
 -- | Abbreviation for 'log' using the corresponding log level.
 trace, debug, info, warn, err, fatal :: MonadLogger m => (Msg -> Msg) -> m ()
-trace = log Trace
-debug = log Debug
-info  = log Info
-warn  = log Warn
-err   = log Error
-fatal = log Fatal
+trace = System.Logger.Class.log Trace
+debug = System.Logger.Class.log Debug
+info  = System.Logger.Class.log Info
+warn  = System.Logger.Class.log Warn
+err   = System.Logger.Class.log Error
+fatal = System.Logger.Class.log Fatal
 
diff --git a/tinylog.cabal b/tinylog.cabal
index 5a3c24d006138decf9b1f9f848a86cc1df5b5c40..ef2cb62c057dada0b5e9afb92f91fe995334b0b0 100644
--- a/tinylog.cabal
+++ b/tinylog.cabal
@@ -33,7 +33,6 @@ library
         , bytestring   >= 0.10
         , date-cache   >= 0.3
         , fast-logger  >= 2.1.4 && < 2.2
-        , mtl          >= 2.1
         , text         >= 0.11  && < 1.2
         , transformers >= 0.3
         , unix-time    >= 0.1