diff --git a/CHANGELOG b/CHANGELOG
--- a/CHANGELOG
+++ b/CHANGELOG
@@ -1,3 +1,10 @@
+
+0.10.1
+------
+
+ * WordSpec: fix a test verification bug (fixed #11)
+ * WordSpec: generation of random text should never include newlines
+
 0.10
 ----
 
diff --git a/tests/WordsSpec.hs b/tests/WordsSpec.hs
--- a/tests/WordsSpec.hs
+++ b/tests/WordsSpec.hs
@@ -120,7 +120,7 @@
       numLines = length (getText zipper)
       curLine = currentLine zipper
     in
-      (col == T.length curLine && row == numLines)
+      (col == T.length curLine && row == numLines - 1)
       || ((col == T.length curLine || isSpace (T.index curLine col)) -- next is space
           && (col == 0 || not (isSpace (T.index curLine (col-1))))) -- previous is word
 
@@ -152,4 +152,8 @@
     _      -> deleteToBeginning (deletePrevChar (killToBOL zipper))
 
 instance Arbitrary Text where
-    arbitrary = T.pack <$> arbitrary
+    arbitrary = do
+        ls <- lines <$> arbitrary
+        return $ T.pack $ case ls of
+            (l:_) -> l
+            _ -> mempty
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.10
+version:             0.10.1
 synopsis:            A text editor zipper library
 description:         This library provides a zipper and API for editing text.
 license:             BSD3