tresor-style wallet is an icarus-style wallet

cardano-foundation · Sep 12, 2023 · 245d8e2 · 245d8e2
1 parent 5bc44c3
commit 245d8e2
Showing 1 changed file with 1 addition and 11 deletions.
diff --git a/lib/wallet/api/http/Cardano/Wallet/Api/Http/Shelley/Server.hs b/lib/wallet/api/http/Cardano/Wallet/Api/Http/Shelley/Server.hs
@@ -1487,17 +1487,7 @@ postTrezorWallet
     => ctx
     -> ByronWalletPostData '[12,15,18,21,24]
     -> Handler ApiByronWallet
-postTrezorWallet ctx body = do
-    postLegacyWallet ctx (rootXPrv, pwd) $ \wrk wid ->
-        W.createIcarusWallet @s genesisParams wrk wid wName
-            (RootCredentials rootXPrv pwdP)
-  where
-    wName    = body ^. #name . #getApiT
-    seed     = body ^. #mnemonicSentence . #getApiMnemonicT
-    pwd      = body ^. #passphrase . #getApiT
-    pwdP     = preparePassphrase currentPassphraseScheme pwd
-    rootXPrv = Icarus.generateKeyFromSeed seed pwdP
-    genesisParams = ctx ^. #netParams
+postTrezorWallet = postIcarusWallet
 
 postLedgerWallet
     :: forall ctx s k n.