This repository was archived by the owner on Mar 1, 2019. It is now read-only.
File tree 3 files changed +8
-4
lines changed
3 files changed +8
-4
lines changed Original file line number Diff line number Diff line change @@ -367,6 +367,7 @@ executable wal-integr-test
367
367
, cardano-sl
368
368
, cardano-sl-core
369
369
, cardano-sl-chain
370
+ , cardano-sl-util
370
371
, cardano-sl-wallet
371
372
, cardano-sl-wallet-new
372
373
, containers
Original file line number Diff line number Diff line change @@ -18,6 +18,8 @@ import Util
18
18
import qualified Data.Map.Strict as Map
19
19
import qualified Pos.Chain.Txp as Txp
20
20
import qualified Pos.Core as Core
21
+ import Pos.Util.Log.LoggerConfig (defaultTestConfiguration )
22
+ import Pos.Util.Wlog (Severity (Debug ), setupLogging )
21
23
22
24
23
25
{-# ANN module ("HLint: ignore Reduce duplication" :: Text) #-}
@@ -29,8 +31,7 @@ ppShowT :: Show a => a -> Text
29
31
ppShowT = fromString . ppShow
30
32
31
33
transactionSpecs :: WalletRef -> WalletClient IO -> Spec
32
- transactionSpecs wRef wc =
33
-
34
+ transactionSpecs wRef wc = beforeAll_ (setupLogging (defaultTestConfiguration Debug )) $
34
35
describe " Transactions" $ do
35
36
36
37
randomTest " posted transactions appear in the index" 1 $ do
Original file line number Diff line number Diff line change @@ -20,9 +20,11 @@ import Pos.Client.KeyStorage (getSecretKeysPlain)
20
20
import Pos.Wallet.Web.Account (genSaveRootKey )
21
21
22
22
import Pos.Launcher (HasConfigurations )
23
+ import Pos.Util.Log.LoggerConfig (defaultTestConfiguration )
24
+ import Pos.Util.Wlog (Severity (Debug ), setupLogging )
23
25
import Test.Pos.Util.QuickCheck.Property (assertProperty )
24
26
25
- import Test.Hspec (Spec , describe )
27
+ import Test.Hspec (Spec , beforeAll_ , describe )
26
28
import Test.Hspec.QuickCheck (modifyMaxSuccess )
27
29
import Test.Pos.Configuration (withDefConfigurations )
28
30
import Test.Pos.Wallet.Web.Mode (walletPropertySpec )
@@ -35,7 +37,7 @@ import Servant
35
37
{-# ANN module ("HLint: ignore Reduce duplication" :: Text) #-}
36
38
37
39
spec :: Spec
38
- spec =
40
+ spec = beforeAll_ (setupLogging (defaultTestConfiguration Debug )) $
39
41
withDefConfigurations $ \ _ _ _ ->
40
42
describe " development endpoint" $
41
43
describe " secret-keys" $ modifyMaxSuccess (const 10 ) deleteAllSecretKeysSpec
You can’t perform that action at this time.
0 commit comments