diff --git a/Data/List/Zipper.hs b/Data/List/Zipper.hs
--- a/Data/List/Zipper.hs
+++ b/Data/List/Zipper.hs
@@ -31,9 +31,9 @@
 cursor (Zip _ (a:_)) = a
 
 left, right :: Zipper a -> Zipper a
-left  (Zip ls (a:rs)) = Zip (a:ls) rs
+left  (Zip (a:ls) rs) = Zip ls (a:rs)
 left  z               = z
-right (Zip (a:ls) rs) = Zip ls (a:rs)
+right (Zip ls (a:rs)) = Zip (a:ls) rs
 right z               = z
 
 insert, push :: a -> Zipper a -> Zipper a
diff --git a/ListZipper.cabal b/ListZipper.cabal
--- a/ListZipper.cabal
+++ b/ListZipper.cabal
@@ -1,5 +1,5 @@
 name:            ListZipper
-version:         1.0.0.0
+version:         1.1.0.0
 copyright:       (c) 2008 Ryan Ingram
 license:         BSD3
 license-file:    LICENSE