diff --git a/library/ListT.hs b/library/ListT.hs
--- a/library/ListT.hs
+++ b/library/ListT.hs
@@ -116,7 +116,7 @@
 
 instance MFunctor ListT where
   hoist f =
-    ListT . f . (fmap . fmap) (id *** hoist f) . unListT
+    ListT . f . (liftM . fmap) (id *** hoist f) . unListT
 
 instance MMonad ListT where
   embed f (ListT m) =
diff --git a/list-t.cabal b/list-t.cabal
--- a/list-t.cabal
+++ b/list-t.cabal
@@ -1,7 +1,7 @@
 name:
   list-t
 version:
-  0.4.6
+  0.4.6.1
 synopsis:
   ListT done right
 description:
@@ -10,9 +10,9 @@
 category:
   Streaming, Data Structures, Control
 homepage:
-  https://github.com/nikita-volkov/list-t 
+  https://github.com/nikita-volkov/list-t
 bug-reports:
-  https://github.com/nikita-volkov/list-t/issues 
+  https://github.com/nikita-volkov/list-t/issues
 author:
   Nikita Volkov <nikita.y.volkov@mail.ru>
 maintainer: