Use method for encryption method in ApiEncryptMetadata. (#4589)

This PR changes the name for the encryption method field for
`ApiEncryptMetadata` from `enc` to `method`.

## Justification

- In the context of the `cardano-wallet` HTTP API, it's idiomatic to use
complete words instead of shortenings such as `enc`.
- The name `method` is consistent with the field type
`ApiEncryptMetadataMethod`.
- The name `method` is (arguably) more self-documenting than `enc`.

## Issue

ADP-322

lib/api/src/Cardano/Wallet/Api/Types.hs

@@ -1245,7 +1245,7 @@ data ApiEncryptMetadataMethod = Basic
 
 data ApiEncryptMetadata = ApiEncryptMetadata
     { passphrase :: ApiT (Passphrase "lenient")
-    , enc :: Maybe ApiEncryptMetadataMethod
+    , method :: Maybe ApiEncryptMetadataMethod
     }
     deriving (Eq, Generic, Show)
     deriving (FromJSON, ToJSON) via DefaultRecord ApiEncryptMetadata

lib/unit/test/unit/Cardano/Wallet/Api/TypesSpec.hs

@@ -1199,7 +1199,7 @@ spec = do
         it "short msg - no salt" $ do
             let apiEncrypt = ApiEncryptMetadata
                     { passphrase = ApiT $ Passphrase "cardano"
-                    , enc = Nothing
+                    , method = Nothing
                     }
                 schemaBefore =
                     TxMetadataWithSchema TxMetadataNoSchema $
@@ -1243,7 +1243,7 @@ spec = do
         it "long msg - no salt" $ do
             let apiEncrypt = ApiEncryptMetadata
                     { passphrase = ApiT $ Passphrase "cardano"
-                    , enc = Nothing
+                    , method = Nothing
                     }
                 schemaBefore =
                     TxMetadataWithSchema TxMetadataNoSchema $
@@ -1291,7 +1291,7 @@ spec = do
         it "cip msg - no salt" $ do
             let apiEncrypt = ApiEncryptMetadata
                     { passphrase = ApiT $ Passphrase "cardano"
-                    , enc = Nothing
+                    , method = Nothing
                     }
                 schemaBefore =
                     TxMetadataWithSchema TxMetadataNoSchema $
@@ -1340,7 +1340,7 @@ spec = do
         it "short msg - salted" $ do
             let apiEncrypt = ApiEncryptMetadata
                     { passphrase = ApiT $ Passphrase "cardano"
-                    , enc = Nothing
+                    , method = Nothing
                     }
                 schemaBefore =
                     TxMetadataWithSchema TxMetadataNoSchema $
@@ -1385,7 +1385,7 @@ spec = do
         it "long msg - salted" $ do
             let apiEncrypt = ApiEncryptMetadata
                     { passphrase = ApiT $ Passphrase "cardano"
-                    , enc = Nothing
+                    , method = Nothing
                     }
                 schemaBefore =
                     TxMetadataWithSchema TxMetadataNoSchema $
@@ -1431,7 +1431,7 @@ spec = do
         it "cip msg - salted" $ do
             let apiEncrypt = ApiEncryptMetadata
                     { passphrase = ApiT $ Passphrase "cardano"
-                    , enc = Nothing
+                    , method = Nothing
                     }
                 schemaBefore =
                     TxMetadataWithSchema TxMetadataNoSchema $
@@ -1479,7 +1479,7 @@ spec = do
         it "msg wrong label - no salt" $ do
             let apiEncrypt = ApiEncryptMetadata
                     { passphrase = ApiT $ Passphrase "cardano"
-                    , enc = Nothing
+                    , method = Nothing
                     }
                 schemaBefore =
                     TxMetadataWithSchema TxMetadataNoSchema $
@@ -1505,7 +1505,7 @@ spec = do
         it "msg without 'msg field' - no salt" $ do
             let apiEncrypt = ApiEncryptMetadata
                     { passphrase = ApiT $ Passphrase "cardano"
-                    , enc = Nothing
+                    , method = Nothing
                     }
                 schemaBefore =
                     TxMetadataWithSchema TxMetadataNoSchema $
@@ -3555,10 +3555,10 @@ class GetPath api where
     getPath :: Proxy api -> (StdMethod, String)
 
 instance (Method m) => GetPath (Verb m s ct a) where
-    getPath _ = (method (Proxy @m), "")
+    getPath _ = (stdMethod (Proxy @m), "")
 
 instance (Method m) => GetPath (NoContentVerb m) where
-    getPath _ = (method (Proxy @m), "")
+    getPath _ = (stdMethod (Proxy @m), "")
 
 instance (KnownSymbol path, GetPath sub) => GetPath (path :> sub) where
     getPath _ =
@@ -3591,13 +3591,13 @@ instance GetPath sub => GetPath (Header' opts name ty :> sub) where
 -- A way to demote 'StdMethod' back to the world of values. Servant provides a
 -- 'reflectMethod' that does just that, but demote types to raw 'ByteString' for
 -- an unknown reason :/
-instance Method 'GET where method _ = GET
-instance Method 'POST where method _ = POST
-instance Method 'PUT where method _ = PUT
-instance Method 'DELETE where method _ = DELETE
-instance Method 'PATCH where method _ = PATCH
+instance Method 'GET where stdMethod _ = GET
+instance Method 'POST where stdMethod _ = POST
+instance Method 'PUT where stdMethod _ = PUT
+instance Method 'DELETE where stdMethod _ = DELETE
+instance Method 'PATCH where stdMethod _ = PATCH
 class Method (m :: StdMethod) where
-    method :: Proxy m -> StdMethod
+    stdMethod :: Proxy m -> StdMethod
 
 {-------------------------------------------------------------------------------
             Generating Golden Test Vectors For Address Encoding

specifications/api/swagger.yaml

@@ -1810,7 +1810,7 @@ x-encryptMetadata: &encryptMetadata
   required:
     - passphrase
   properties:
-    enc: *encryptionMethod
+    method: *encryptionMethod
     passphrase: *lenientPassphrase
 
 x-transactionTTL: &transactionTTL