Skip to content
This repository was archived by the owner on Mar 1, 2019. It is now read-only.

Commit d712da3

Browse files
Andreas TriantafyllosCodiePP
Andreas Triantafyllos
authored andcommitted
[CBR-275] Revive tests and startup code
1 parent 7081d9d commit d712da3

File tree

3 files changed

+8
-4
lines changed

3 files changed

+8
-4
lines changed

cardano-sl-wallet-new.cabal

+1
Original file line numberDiff line numberDiff line change
@@ -367,6 +367,7 @@ executable wal-integr-test
367367
, cardano-sl
368368
, cardano-sl-core
369369
, cardano-sl-chain
370+
, cardano-sl-util
370371
, cardano-sl-wallet
371372
, cardano-sl-wallet-new
372373
, containers

integration/TransactionSpecs.hs

+3-2
Original file line numberDiff line numberDiff line change
@@ -18,6 +18,8 @@ import Util
1818
import qualified Data.Map.Strict as Map
1919
import qualified Pos.Chain.Txp as Txp
2020
import qualified Pos.Core as Core
21+
import Pos.Util.Log.LoggerConfig (defaultTestConfiguration)
22+
import Pos.Util.Wlog (Severity (Debug), setupLogging)
2123

2224

2325
{-# ANN module ("HLint: ignore Reduce duplication" :: Text) #-}
@@ -29,8 +31,7 @@ ppShowT :: Show a => a -> Text
2931
ppShowT = fromString . ppShow
3032

3133
transactionSpecs :: WalletRef -> WalletClient IO -> Spec
32-
transactionSpecs wRef wc =
33-
34+
transactionSpecs wRef wc = beforeAll_ (setupLogging (defaultTestConfiguration Debug)) $
3435
describe "Transactions" $ do
3536

3637
randomTest "posted transactions appear in the index" 1 $ do

test/InternalAPISpec.hs

+4-2
Original file line numberDiff line numberDiff line change
@@ -20,9 +20,11 @@ import Pos.Client.KeyStorage (getSecretKeysPlain)
2020
import Pos.Wallet.Web.Account (genSaveRootKey)
2121

2222
import Pos.Launcher (HasConfigurations)
23+
import Pos.Util.Log.LoggerConfig (defaultTestConfiguration)
24+
import Pos.Util.Wlog (Severity (Debug), setupLogging)
2325
import Test.Pos.Util.QuickCheck.Property (assertProperty)
2426

25-
import Test.Hspec (Spec, describe)
27+
import Test.Hspec (Spec, beforeAll_, describe)
2628
import Test.Hspec.QuickCheck (modifyMaxSuccess)
2729
import Test.Pos.Configuration (withDefConfigurations)
2830
import Test.Pos.Wallet.Web.Mode (walletPropertySpec)
@@ -35,7 +37,7 @@ import Servant
3537
{-# ANN module ("HLint: ignore Reduce duplication" :: Text) #-}
3638

3739
spec :: Spec
38-
spec =
40+
spec = beforeAll_ (setupLogging (defaultTestConfiguration Debug)) $
3941
withDefConfigurations $ \_ _ _ ->
4042
describe "development endpoint" $
4143
describe "secret-keys" $ modifyMaxSuccess (const 10) deleteAllSecretKeysSpec

0 commit comments

Comments
 (0)