Skip to content

Commit

Permalink
align with createWalletWorker changes
Browse files Browse the repository at this point in the history
  • Loading branch information
paweljakubas committed Apr 8, 2021
1 parent 1178dc9 commit 8becf0c
Showing 1 changed file with 4 additions and 6 deletions.
10 changes: 4 additions & 6 deletions lib/core/src/Cardano/Wallet/Api/Server.hs
Expand Up @@ -870,10 +870,9 @@ postSharedWalletFromRootXPrv
-> Handler ApiSharedWallet
postSharedWalletFromRootXPrv ctx generateKey body = do
let state = mkSharedStateFromRootXPrv (rootXPrv, pwd) accIx g pTemplate dTemplateM
void $ liftHandler $ initWorker @_ @s @k ctx wid
void $ liftHandler $ createWalletWorker @_ @s @k ctx wid
(\wrk -> W.createWallet @(WorkerCtx ctx) @s @k wrk wid wName state)
(\wrk -> W.restoreWallet @(WorkerCtx ctx) @s @k wrk wid)
(\wrk -> W.manageRewardBalance @(WorkerCtx ctx) @s @k (Proxy @n) wrk wid)
(\wrk _ -> W.manageRewardBalance @(WorkerCtx ctx) @s @k (Proxy @n) wrk wid)
withWorkerCtx @_ @s @k ctx wid liftE liftE $ \wrk -> liftHandler $
W.attachPrivateKeyFromPwd @_ @s @k wrk wid (rootXPrv, pwd)
fst <$> getWallet ctx (mkSharedWallet @_ @s @k) (ApiT wid)
Expand Down Expand Up @@ -907,10 +906,9 @@ postSharedWalletFromAccountXPub
-> Handler ApiSharedWallet
postSharedWalletFromAccountXPub ctx liftKey body = do
let state = mkSharedStateFromAccountXPub (liftKey accXPub) accIx g pTemplate dTemplateM
void $ liftHandler $ initWorker @_ @s @k ctx wid
void $ liftHandler $ createWalletWorker @_ @s @k ctx wid
(\wrk -> W.createWallet @(WorkerCtx ctx) @s @k wrk wid wName state)
(\wrk -> W.restoreWallet @(WorkerCtx ctx) @s @k wrk wid)
(`idleWorker` wid)
idleWorker
fst <$> getWallet ctx (mkSharedWallet @_ @s @k) (ApiT wid)
where
g = defaultAddressPoolGap
Expand Down

0 comments on commit 8becf0c

Please sign in to comment.