add ApiTransactionConstructData and ApiDelegationTx

cardano-foundation · Jun 14, 2021 · f9c43ad · f9c43ad
1 parent 35f82fa
commit f9c43ad
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 4 deletions.
diff --git a/lib/core/src/Cardano/Wallet/Api/Types.hs b/lib/core/src/Cardano/Wallet/Api/Types.hs
@@ -858,6 +858,20 @@ data ApiConstructTransaction (n :: NetworkDiscriminant) = ApiConstructTransactio
     } deriving (Eq, Generic, Show)
       deriving anyclass NFData
 
+data ApiDelegationTx = ApiDelegationTx
+    { delegationAction :: !ApiDelegationAction
+    } deriving (Eq, Generic, Show)
+      deriving anyclass NFData
+
+data ApiTransactionConstructData (n :: NetworkDiscriminant) = ApiTransactionConstructData
+    { payments :: !(Maybe (NonEmpty (AddressAmount (ApiT Address, Proxy n))))
+    , withdrawal :: !(Maybe ApiWithdrawalPostData)
+    , metadata :: !(Maybe (ApiT TxMetadata))
+    , mint :: !(Maybe (ApiT W.TokenMap))
+    , delegation :: ![ApiDelegationTx]
+    , timeToLive :: !(Maybe (Quantity "second" NominalDiffTime))
+    } deriving (Eq, Generic, Show)
+
 data PostTransactionData (n :: NetworkDiscriminant) = PostTransactionData
     { payments :: !(NonEmpty (AddressAmount (ApiT Address, Proxy n)))
     , passphrase :: !(ApiT (Passphrase "lenient"))

diff --git a/specifications/api/swagger.yaml b/specifications/api/swagger.yaml
@@ -1142,11 +1142,9 @@ x-transactionDelegations: &transactionDelegations
     type: object
     additionalProperties: false
     required:
-      - delegation_action
-      - delegation_target
+      - action
     properties:
-      delegation_action: *delegationTarget
-      delegation_target: *delegationTarget
+      action: *delegationAction
 
 x-transactionMint: &transactionMint
   description: |