Skip to content

Commit

Permalink
Apply suggestions from self-review
Browse files Browse the repository at this point in the history
  • Loading branch information
chessai authored Nov 16, 2023
1 parent 40df59e commit 2e95c0b
Show file tree
Hide file tree
Showing 2 changed files with 2 additions and 2 deletions.
2 changes: 1 addition & 1 deletion test/Chainweb/Test/Pact/RemotePactTest.hs
Original file line number Diff line number Diff line change
Expand Up @@ -359,7 +359,7 @@ txlogsTest t cenv pactDbDir = do
]
buildTextCmd
$ set cbSigners [mkSigner' sender00 []]
$ set cbGasLimit 100_000 --300_000
$ set cbGasLimit 100_000
$ set cbTTL defaultMaxTTL
$ set cbCreationTime t
$ set cbChainId cid
Expand Down
2 changes: 1 addition & 1 deletion test/Chainweb/Test/Utils.hs
Original file line number Diff line number Diff line change
Expand Up @@ -1079,7 +1079,7 @@ withDbDirs n = do
pure m

ignoringIOErrors :: (MonadCatch m) => m () -> m ()
ignoringIOErrors ioe = ioe `catch` (\e -> const (return ()) (e :: IOError))
ignoringIOErrors ioe = ioe `catch` (\e -> const (pure ()) (e :: IOError))

deadbeef :: TransactionHash
deadbeef = TransactionHash "deadbeefdeadbeefdeadbeefdeadbeef"
Expand Down

0 comments on commit 2e95c0b

Please sign in to comment.