diff --git a/digestive-functors-aeson.cabal b/digestive-functors-aeson.cabal
--- a/digestive-functors-aeson.cabal
+++ b/digestive-functors-aeson.cabal
@@ -1,6 +1,6 @@
 name: digestive-functors-aeson
 category: Web, JSON
-version: 1.0.0
+version: 1.0.1
 license: GPL-3
 license-file: LICENSE
 author: Oliver Charles
@@ -29,6 +29,7 @@
     base >= 4.5 && < 4.7,
     digestive-functors >= 0.5,
     lens >= 3.0,
+    safe >= 0.3.3,
     text >= 0.11
   hs-source-dirs: src
   ghc-options: -Wall -fwarn-tabs -funbox-strict-fields -O2
diff --git a/src/Text/Digestive/Aeson.hs b/src/Text/Digestive/Aeson.hs
--- a/src/Text/Digestive/Aeson.hs
+++ b/src/Text/Digestive/Aeson.hs
@@ -7,8 +7,8 @@
 import Control.Lens
 import Data.Aeson (Value(..))
 import Data.Aeson.Lens
+import Safe
 import Text.Digestive
-import Text.Read (readMaybe)
 
 import qualified Data.Text as T
 
@@ -40,7 +40,7 @@
           Just v ^. pathToLens (filter (not . T.null) p)
 
         pathToLens = foldl (.) id . map pathElem
-        pathElem p = maybe (key p) nth (readMaybe $ T.unpack p)
+        pathElem p = maybe (key p) nth (readMay $ T.unpack p)
 
         jsonToText (String s) = [TextInput s]
         jsonToText (Bool b)   = showPack b