diff options
Diffstat (limited to 'src/Data')
| -rw-r--r-- | src/Data/Aeson/Extends.hs | 7 | ||||
| -rw-r--r-- | src/Data/WText/Aeson.hs | 12 |
2 files changed, 15 insertions, 4 deletions
diff --git a/src/Data/Aeson/Extends.hs b/src/Data/Aeson/Extends.hs index d78f81d..2905e60 100644 --- a/src/Data/Aeson/Extends.hs +++ b/src/Data/Aeson/Extends.hs @@ -1,10 +1,9 @@ module Data.Aeson.Extends (module Data.Aeson.Extends) where import Data.Aeson as Data.Aeson.Extends - -import qualified Data.ByteString.Lazy as LBS -import qualified Data.Text.Encoding.Error as TE -import qualified Data.Text.Lazy.Encoding as LT +import Data.ByteString.Lazy qualified as LBS +import Data.Text.Encoding.Error qualified as TE +import Data.Text.Lazy.Encoding qualified as LT eitherDecodeLenient' :: FromJSON a => LBS.ByteString -> Either String a diff --git a/src/Data/WText/Aeson.hs b/src/Data/WText/Aeson.hs new file mode 100644 index 0000000..06aa4fb --- /dev/null +++ b/src/Data/WText/Aeson.hs @@ -0,0 +1,12 @@ +{-# LANGUAGE DerivingVia #-} +{-# OPTIONS_GHC -fno-warn-orphans #-} + +module Data.WText.Aeson where + +import Data.Aeson (FromJSON, ToJSON) +import Data.Text (Text) +import Data.WText (WText(WText)) + + +deriving via Text instance FromJSON WText +deriving via Text instance ToJSON WText |