Remove deprecated withNumber, use withScientific instead

Author: bergmark

Data/Aeson.hs

@@ -113,7 +113,6 @@ module Data.Aeson
     , withObject
     , withText
     , withArray
-    , withNumber
     , withScientific
     , withBool
     , withEmbeddedJSON

Data/Aeson/Types.hs

@@ -81,7 +81,6 @@ module Data.Aeson.Types
     , withObject
     , withText
     , withArray
-    , withNumber
     , withScientific
     , withBool
     , withEmbeddedJSON

Data/Aeson/Types/Class.hs

@@ -70,7 +70,6 @@ module Data.Aeson.Types.Class
     , withObject
     , withText
     , withArray
-    , withNumber
     , withScientific
     , withBool
     , withEmbeddedJSON

Data/Aeson/Types/FromJSON.hs

@@ -52,7 +52,6 @@ module Data.Aeson.Types.FromJSON
     , withObject
     , withText
     , withArray
-    , withNumber
     , withScientific
     , withBool
     , withEmbeddedJSON
@@ -646,13 +645,6 @@ withArray _        f (Array arr) = f arr
 withArray expected _ v           = typeMismatch expected v
 {-# INLINE withArray #-}
 
--- | @'withNumber' expected f value@ applies @f@ to the 'Number' when @value@
--- is a 'Number' and fails using @'typeMismatch' expected@ otherwise.
-withNumber :: String -> (Number -> Parser a) -> Value -> Parser a
-withNumber expected f = withScientific expected (f . scientificToNumber)
-{-# INLINE withNumber #-}
-{-# DEPRECATED withNumber "Use withScientific instead" #-}
-
 -- | @'withScientific' expected f value@ applies @f@ to the 'Scientific' number
 -- when @value@ is a 'Number' and fails using @'typeMismatch' expected@
 -- otherwise.

changelog.md

@@ -1,5 +1,9 @@
 For the latest version of this document, please see [https://github.com/bos/aeson/blob/master/changelog.md](https://github.com/bos/aeson/blob/master/changelog.md).
 
+### 1.4.0.0 (upcoming)
+
+* Remove deprecated `withNumber`, use `withScientific` instead.
+
 ### 1.3.1.1
 
 * Catch 0 denominators when parsing Ratio