diff --git a/Data/DList.hs b/Data/DList.hs
--- a/Data/DList.hs
+++ b/Data/DList.hs
@@ -102,11 +102,11 @@
 
 -- | Return the head of the list
 head :: DList a -> a
-head = list (error "Data.DList.head: empty list") (curry fst)
+head = list (error "Data.DList.head: empty list") const
 
 -- | Return the tail of the list
 tail :: DList a -> DList a
-tail = list (error "Data.DList.tail: empty list") (curry snd)
+tail = list (error "Data.DList.tail: empty list") (flip const)
 
 -- | Unfoldr for difference lists
 unfoldr :: (b -> Maybe (a, b)) -> b -> DList a
diff --git a/dlist.cabal b/dlist.cabal
--- a/dlist.cabal
+++ b/dlist.cabal
@@ -1,5 +1,5 @@
 Name:                dlist
-Version:             0.3
+Version:             0.3.1
 Synopsis:            Differences lists
 Description:         Differences lists: a list-like type supporting O(1) append
 Category:            Data
