diff --git a/Control/Applicative/Error.hs b/Control/Applicative/Error.hs
--- a/Control/Applicative/Error.hs
+++ b/Control/Applicative/Error.hs
@@ -21,7 +21,7 @@
    Success f <*> Success x = Success (f x)
 
 maybeRead :: Read a => String -> Maybe a
-maybeRead s | [(i, _)] <- readsPrec 0 s = Just i
+maybeRead s | [(i, "")] <- readsPrec 0 s = Just i
             | otherwise = Nothing
 
 -- | Tries to read a value. Shows an error message when reading fails.
diff --git a/applicative-extras.cabal b/applicative-extras.cabal
--- a/applicative-extras.cabal
+++ b/applicative-extras.cabal
@@ -1,5 +1,5 @@
 Name:            applicative-extras
-Version:         0.1.3
+Version:         0.1.4
 Synopsis:        Instances for Applicative
 Description:     Some instances for Applicative and type-level composition.
 Category:        Control
