diff --git a/lib/primitive/lib/Cardano/Wallet/Primitive/Types/MetadataEncryption.hs b/lib/primitive/lib/Cardano/Wallet/Primitive/Types/MetadataEncryption.hs index 602aeb13273..06fd4702b60 100644 --- a/lib/primitive/lib/Cardano/Wallet/Primitive/Types/MetadataEncryption.hs +++ b/lib/primitive/lib/Cardano/Wallet/Primitive/Types/MetadataEncryption.hs @@ -21,9 +21,9 @@ where import Prelude import Cardano.Api - ( TxMetadataJsonSchemaError (..) + ( TxMetadata (..) + , TxMetadataJsonSchemaError (..) , TxMetadataValue (..) - , TxMetadata (..) , metadataValueToJsonNoSchema ) import Cardano.Api.Error @@ -63,8 +63,8 @@ import Data.ByteString ( ByteString ) import Data.Maybe - ( isJust - , fromMaybe + ( fromMaybe + , isJust , mapMaybe ) import Data.Text diff --git a/lib/primitive/test/spec/Cardano/Wallet/Primitive/Types/MetadataEncryptionSpec.hs b/lib/primitive/test/spec/Cardano/Wallet/Primitive/Types/MetadataEncryptionSpec.hs index 1924f21459f..a47e65f0874 100644 --- a/lib/primitive/test/spec/Cardano/Wallet/Primitive/Types/MetadataEncryptionSpec.hs +++ b/lib/primitive/test/spec/Cardano/Wallet/Primitive/Types/MetadataEncryptionSpec.hs @@ -10,10 +10,10 @@ import Prelude import Cardano.Wallet.Primitive.Types.MetadataEncryption ( ErrMetadataDecryption (..) , ErrMetadataEncryption (..) + , cip20MetadataKey , cip83EncryptMethodKey , cip83EncryptPayloadKey , cip83EncryptPayloadValue - , cip20MetadataKey , fromMetadataEncrypted , toMetadataEncrypted ) @@ -25,9 +25,9 @@ import Data.ByteString ( ByteString ) import Data.Either - ( isLeft + ( fromRight + , isLeft , isRight - , fromRight ) import Data.Either.Combinators ( rightToMaybe