Skip to content

Commit

Permalink
add failing expectation for getTransaction
Browse files Browse the repository at this point in the history
  • Loading branch information
paweljakubas committed May 30, 2023
1 parent 47d37d6 commit 6b87961
Showing 1 changed file with 6 additions and 0 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -1936,6 +1936,9 @@ spec = describe "SHARED_TRANSACTIONS" $ do
, expectField (#direction . #getApiT) (`shouldBe` Outgoing)
, expectField #depositTaken (`shouldBe` depositAmt)
, expectField #depositReturned (`shouldBe` Quantity 0)
, expectField #certificates
(`shouldBe` [ registerStakeKeyCert stakeKeyDerPathParty1
, delegatingCert stakeKeyDerPathParty1])
]
eventually "Party2's wallet has joined pool and deposit info persists" $ do
rJoin' <- request @(ApiTransaction n) ctx
Expand All @@ -1948,6 +1951,9 @@ spec = describe "SHARED_TRANSACTIONS" $ do
, expectField (#direction . #getApiT) (`shouldBe` Outgoing)
, expectField #depositTaken (`shouldBe` depositAmt)
, expectField #depositReturned (`shouldBe` Quantity 0)
, expectField #certificates
(`shouldBe` [ registerStakeKeyCert stakeKeyDerPathParty2
, delegatingCert stakeKeyDerPathParty2])
]

let txId2 = getFromResponse #id submittedTx2
Expand Down

0 comments on commit 6b87961

Please sign in to comment.