typos

cardano-foundation · Apr 25, 2024 · 98be543 · 98be543
1 parent 1a681e3
commit 98be543
Show file tree

Hide file tree

Showing 3 changed files with 12 additions and 4 deletions.
diff --git a/lib/api/src/Cardano/Wallet/Api/Types.hs b/lib/api/src/Cardano/Wallet/Api/Types.hs
@@ -1243,13 +1243,13 @@ data EncryptMetadataMethod =  AES256CBC
     deriving anyclass NFData
 
 instance ToJSON EncryptMetadataMethod where
-    toJSON AES256CBC = "base"
+    toJSON AES256CBC = "basic"
 instance FromJSON EncryptMetadataMethod where
     parseJSON = withText "base" $ \txt ->
-        if txt == "base" then
+        if txt == "basic" then
             pure AES256CBC
         else
-            fail "'base' is expected."
+            fail "'basic' is expected."
 
 data ApiEncryptMetadata = ApiEncryptMetadata
     { passphrase :: ApiT (Passphrase "lenient")

diff --git a/lib/unit/test/unit/Cardano/Wallet/Api/TypesSpec.hs b/lib/unit/test/unit/Cardano/Wallet/Api/TypesSpec.hs
@@ -1184,6 +1184,14 @@ spec = do
             parseUrlPiece "patate"
                 `shouldBe` (Left @Text @(ApiT AddressState) msg)
 
+    describe "Api Errors" $ do
+        it "Every ApiErrorInfo constructor has a corresponding schema type" $
+            let res = fromJSON @SchemaApiErrorInfo specification
+                errStr = case res of
+                    Error s -> s
+                    _ -> ""
+            in counterexample errStr $ res == Success SchemaApiErrorInfo
+
     describe "toMetadataEncrypted openssl goldens" $ do
         -- $ echo -n '"secret data"' | openssl enc -e -aes-256-cbc -pbkdf2 -iter 10000 -a -k "cardano" -nosalt
         -- vBSywXY+WGcrckHUCyjJcQ==

diff --git a/specifications/api/swagger.yaml b/specifications/api/swagger.yaml
@@ -1791,7 +1791,7 @@ x-transactionMetadata: &transactionMetadata
 x-encryptionMethod: &encryptionMethod
   type: string
   enum:
-    - base
+    - basic
 
 x-encryptMetadata: &encryptMetadata
   description: |