diff --git a/CHANGELOG b/CHANGELOG
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,3 +1,8 @@
+0.8.2
+-----
+
+- Fixed insertMany for zippers with no line limit
+
 0.8.1
 -----
 
diff --git a/src/Data/Text/Zipper.hs b/src/Data/Text/Zipper.hs
--- a/src/Data/Text/Zipper.hs
+++ b/src/Data/Text/Zipper.hs
@@ -195,8 +195,12 @@
 insertMany :: (Monoid a) => a -> TextZipper a -> TextZipper a
 insertMany cs tz =
     let ls = lines_ tz cs
+        go []     z = z
+        go (a:as) z = go as $ breakLine $ z { toLeft = toLeft z `mappend` a }
     in case lineLimit tz of
-        Nothing    -> tz { toLeft = toLeft tz `mappend` cs }
+        Nothing    ->
+            let toInsert = ls
+            in go toInsert tz
         Just limit ->
             -- How many more lines can we add without violating the
             -- limit?
@@ -204,9 +208,6 @@
                 remainingLines = max 0 (limit - totalLines)
                 totalLines = length (above tz) +
                              length (below tz)
-
-                go []     z = z
-                go (a:as) z = go as $ breakLine $ z { toLeft = toLeft z `mappend` a }
             in go toInsert tz
 
 -- |Insert a line break at the current cursor position.
diff --git a/text-zipper.cabal b/text-zipper.cabal
--- a/text-zipper.cabal
+++ b/text-zipper.cabal
@@ -1,5 +1,5 @@
 name:                text-zipper
-version:             0.8.1
+version:             0.8.2
 synopsis:            A text editor zipper library
 description:         This library provides a zipper and API for editing text.
 license:             BSD3