Remove use of eitherDecodeLenient

cardano-foundation · Mar 13, 2024 · 1fb36da · 1fb36da
1 parent 81d7c66
commit 1fb36da
Showing 1 changed file with 1 addition and 4 deletions.
diff --git a/lib/deposit-wallet-mock/src/Servant/FineTypes.hs b/lib/deposit-wallet-mock/src/Servant/FineTypes.hs
@@ -28,9 +28,6 @@ import Servant.API
     , MimeRender (..)
     , MimeUnrender (..)
     )
-import Servant.API.ContentTypes
-    ( eitherDecodeLenient
-    )
 
 import Data.Aeson as JS
 
@@ -52,6 +49,6 @@ instance forall a. ToValue a => MimeRender FineJSON a where
 
 instance forall a. FromValue a => MimeUnrender FineJSON a where
     mimeUnrender _ bs =
-        fmap fromValue . valueFromJson typ =<< eitherDecodeLenient bs
+        fmap fromValue . valueFromJson typ =<< JS.eitherDecode bs
       where
         typ = toTyp (Proxy :: Proxy a)