Merge pull request #706 from fosskers/master
Fix minor spelling mistake
commit10681a5dddd0af0ee07e3fdb0367a57238152542
authorAdam Bergmark <adam@bergmark.nl>
dateTue 11 Jun 2019, 09:51 (7 years ago)
parent544cfdc428fcb7
Data/Aeson/Types/FromJSON.hs+1−1
@@ -1663,7 +1663,7 @@ instance FromJSON1 NonEmpty where
16631663 liftParseJSON p _ = withArray "NonEmpty" $
16641664 (>>= ne) . Tr.sequence . zipWith (parseIndexedJSON p) [0..] . V.toList
16651665 where
1666− ne [] = fail "parsing NonEmpty failed, unpexpected empty list"
1666+ ne [] = fail "parsing NonEmpty failed, unexpected empty list"
16671667 ne (x:xs) = pure (x :| xs)
16681668 {-# INLINE liftParseJSON #-}
16691669