diff --git a/ListLike.cabal b/ListLike.cabal
--- a/ListLike.cabal
+++ b/ListLike.cabal
@@ -1,5 +1,5 @@
 Name: ListLike
-Version: 3.1.7
+Version: 3.1.7.1
 License: BSD3
 Maintainer: John Lato <jwlato@gmail.com>
 Author: John Goerzen
diff --git a/src/Data/ListLike/Base.hs b/src/Data/ListLike/Base.hs
--- a/src/Data/ListLike/Base.hs
+++ b/src/Data/ListLike/Base.hs
@@ -598,7 +598,6 @@
     findIndex = L.findIndex
     sequence = M.sequence . toList
     -- mapM = M.mapM
-    -- mapM_ = M.mapM_
     nub = L.nub
     delete = L.delete
     deleteFirsts = (L.\\)
diff --git a/src/Data/ListLike/Instances.hs b/src/Data/ListLike/Instances.hs
--- a/src/Data/ListLike/Instances.hs
+++ b/src/Data/ListLike/Instances.hs
@@ -151,7 +151,6 @@
     -- do monadic stuff via a list instead
     sequence  = liftM fromList . P.sequence  . toList
     mapM func = liftM fromList . P.mapM func . toList
-    mapM_ func = P.mapM_ func . toList
     --nub = BS.nub
     --delete = BS.delete
     --deleteFirsts = BS.deleteFirsts
@@ -260,7 +259,6 @@
     --findIndices x = fromList . L.map fromIntegral . BSL.findIndices x
     sequence  = liftM fromList . P.sequence  . toList
     mapM func = liftM fromList . P.mapM func . toList
-    mapM_ func = P.mapM_ func . toList
     --sequence = BSL.sequence
     --mapM = BSL.mapM
     --mapM_ = BSL.mapM_
@@ -401,7 +399,6 @@
     findIndices f = fromList . L.findIndices f . toList
     sequence  = liftM fromList . P.sequence  . toList
     mapM func = liftM fromList . P.mapM func . toList
-    mapM_ func = P.mapM_ func . toList
     -- rigidMapM = mapM
     nub = fromList . L.nub . toList
     -- delete