diff --git a/src/Data/Transaction.hs b/src/Data/Transaction.hs
--- a/src/Data/Transaction.hs
+++ b/src/Data/Transaction.hs
@@ -157,7 +157,7 @@
 foldl1' _ (TNull ()) = error "Transaction.foldl1': empty transaction"
 foldl1' f (TVal a next) = foldl' f a next
 
-#if MIN_VERSION_base(4,11,0)
+#if MIN_VERSION_mono_traversable(1,0,2)
 {-# NOINLINE [1] length #-}
 length :: Transaction a -> Int
 length t = lenAcc t 0
diff --git a/transaction.cabal b/transaction.cabal
--- a/transaction.cabal
+++ b/transaction.cabal
@@ -1,5 +1,5 @@
 name:                transaction
-version:             0.1.1.2
+version:             0.1.1.3
 synopsis:            Monadic representation of transactions.
 description:
     Monadic representation of transactions. Alike `List`, but can be declared with `do` notations.
@@ -18,7 +18,7 @@
   hs-source-dirs:      src
   exposed-modules:     Data.Transaction
   build-depends:       base >= 4.9 && < 5
-                     , mono-traversable
+                     , mono-traversable >= 1.0.0.1 && < 1.1
   default-language:    Haskell2010
   default-extensions:  OverloadedStrings
                      , RecordWildCards