@@ -128,13 +128,13 @@ eitherDecode' = eitherDecodeWith json' fromJSON
128128-- > data Person = Person
129129-- > { name :: Text
130130-- > , age :: Int
131−-- > } deriving Show-
131+-- > } deriving Show
132132--
133133-- To decode data, we need to define a 'FromJSON' instance:
134134--
135135-- > {-# LANGUAGE OverloadedStrings #-}
136136-- >
137−-- > instance FromJSON Coord where
137+-- > instance FromJSON Person where
138138-- > parseJSON (Object v) = Person <$>
139139-- > v .: "name" <*>
140140-- > v .: "age"