@@ -1,5 +1,6 @@
1{-# LANGUAGE DeriveFunctor #-}
1{-# LANGUAGE DeriveFunctor #-}
2{-# LANGUAGE DeriveDataTypeable #-}
2{-# LANGUAGE DeriveDataTypeable #-}
3+{-# LANGUAGE GeneralisedNewtypeDeriving #-}
3-- | Module with newtypes suitable to usage with @DerivingVia@ or standalone.
4-- | Module with newtypes suitable to usage with @DerivingVia@ or standalone.
5-- The newtypes are named after packages they wrap.
6-- The newtypes are named after packages they wrap.
@@ -37,7 +38,7 @@ import qualified Data.Aeson as Aeson
38-- @since 0.6.3
39-- @since 0.6.3
39newtype Aeson a = Aeson a
40newtype Aeson a = Aeson a
40− deriving (Eq, Show, Read, Typeable, Functor)
41+ deriving (Eq, Ord, Show, Read, Typeable, Functor, Aeson.FromJSON, Aeson.ToJSON)
42getAeson :: Aeson a -> a
43getAeson :: Aeson a -> a
43getAeson (Aeson a) = a
44getAeson (Aeson a) = a