Skip to content

Commit

Permalink
Adjust to latest cardano-wallet-agda
Browse files Browse the repository at this point in the history
  • Loading branch information
HeinrichApfelmus committed Nov 28, 2024
1 parent 432901c commit 2cbc7f9
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 14 deletions.
4 changes: 2 additions & 2 deletions cabal.project
Original file line number Diff line number Diff line change
Expand Up @@ -157,8 +157,8 @@ source-repository-package
source-repository-package
type: git
location: https://github.com/cardano-foundation/cardano-wallet-agda
tag: 4a95dadc7c7033d9cb83a3cd4a72cd34f04aaa48
--sha256: 1kk3v22pv8kr5ywjd3grb4s276cx1vcyz2djgg9dckn4nmywzdcs
tag: 7d223bf59e84f6bb0ec65761fbedfde9b7d453ae
--sha256: 1xq89f6x92pi5hrcsh71say36w8gy1g31782bcrgybb22k3pjm8f
subdir:
lib/customer-deposit-wallet-pure
lib/cardano-wallet-read
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -11,12 +11,9 @@ import Cardano.Crypto.Wallet
)
import Cardano.Wallet.Address.BIP32
( BIP32Path (..)
, DerivationType (..)
)
import Cardano.Wallet.Address.BIP32_Ed25519
( XPrv
, deriveXPrvHard
, deriveXPrvSoft
( deriveXPrvBIP32Path
)
import Cardano.Wallet.Deposit.Pure.State.Submissions
( availableUTxO
Expand Down Expand Up @@ -71,12 +68,5 @@ signTx tx passphrase w = signTx' <$> rootXSignKey w
(T.encodeUtf8 passphrase)
BS.empty
encryptedXPrv
keys = deriveBIP32Path unencryptedXPrv
keys = deriveXPrvBIP32Path unencryptedXPrv
<$> getBIP32PathsForOwnedInputs tx w

deriveBIP32Path :: XPrv -> BIP32Path -> XPrv
deriveBIP32Path xprv Root = xprv
deriveBIP32Path xprv (Segment path Hardened ix) =
deriveXPrvHard (deriveBIP32Path xprv path) ix
deriveBIP32Path xprv (Segment path Soft ix) =
deriveXPrvSoft (deriveBIP32Path xprv path) ix

0 comments on commit 2cbc7f9

Please sign in to comment.