diff --git a/Data/ByteString/Parse.hs b/Data/ByteString/Parse.hs
--- a/Data/ByteString/Parse.hs
+++ b/Data/ByteString/Parse.hs
@@ -49,7 +49,7 @@
 -- | Simple parsing result, that represent respectively:
 --
 -- * failure: with the error message
--- 
+--
 -- * continuation: that need for more input data
 --
 -- * success: the remaining unparsed data and the parser value
@@ -79,7 +79,7 @@
     mzero = fail "Parser.MonadPlus.mzero"
     mplus f g = Parser $ \buf err ok ->
         -- rewrite the err callback of @f to call @g
-        runParser f buf (\buf' _ -> runParser g buf' err ok) ok
+        runParser f buf (\_ _ -> runParser g buf err ok) ok
 instance Functor Parser where
     fmap f p = Parser $ \buf err ok ->
         runParser p buf err (\b a -> ok b (f a))
@@ -89,7 +89,7 @@
 instance Alternative Parser where
     empty = fail "Parser.Alternative.empty"
     (<|>) = mplus
-    
+
 -- | Run a parser on an @initial ByteString.
 --
 -- If the Parser need more data than available, the @feeder function
@@ -139,7 +139,7 @@
 byte w = Parser $ \buf err ok ->
     case B.uncons buf of
         Nothing      -> runParser (getMore >> byte w) buf err ok
-        Just (c1,b2) | c1 == w   -> ok b2 () 
+        Just (c1,b2) | c1 == w   -> ok b2 ()
                      | otherwise -> err buf ("byte " ++ show w ++ " : failed")
 
 -- | Parse a sequence of bytes from current position
diff --git a/bsparse.cabal b/bsparse.cabal
--- a/bsparse.cabal
+++ b/bsparse.cabal
@@ -1,5 +1,5 @@
 Name:                bsparse
-Version:             0.0.4
+Version:             0.0.5
 Synopsis:            A simple unassuming parser for bytestring
 Description:         Really trivial parser to get and drop bytes from a bytestring
 License:             BSD3
