Skip to content
Permalink
Browse files

fix hlint and tests

  • Loading branch information...
cleverca22 committed Mar 13, 2019
1 parent b4be5cf commit 9692f115fbdd61486e17638ec51b58c2a54ec811
@@ -22,8 +22,8 @@ import qualified Formatting as F

import Pos.Chain.Block (Blund, blockHeader, headerHash, prevBlockL)
import Pos.Chain.Genesis (Config (..))
import Pos.Chain.Txp (TxIn, TxOutAux)
import Pos.Chain.Txp (toaOut, txOutAddress, txOutValue)
import Pos.Chain.Txp (TxIn, TxOutAux, toaOut, txOutAddress,
txOutValue)
import Pos.Chain.Update (HasUpdateConfiguration)
import Pos.Core.Chrono (OldestFirst (..))
import Pos.Core.Common (Coin, addrToBase58, mkCoin, unsafeAddCoin)
@@ -776,7 +776,7 @@ withNextFaucet actionWithFaucet = do
let acquireFaucet = do
let (key:rest) = ctx ^. faucets
put (ctx & faucets .~ rest)
successfulRequest $ Client.importWallet $- WalletImport Nothing key
successfulRequest $ Client.importWallet $- WalletImport Nothing (Just key) Nothing

let releaseFaucet faucet = do
successfulRequest (Client.deleteWallet $- walId faucet)

0 comments on commit 9692f11

Please sign in to comment.
You can’t perform that action at this time.