Skip to content

Commit a2b2224

Browse files
hlint fixes
1 parent d41ee32 commit a2b2224

File tree

1 file changed

+2
-3
lines changed

1 file changed

+2
-3
lines changed

lib/Echidna/Onchain.hs

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -43,9 +43,8 @@ saveRpcCache env = do
4343
(Just dir, Just n) -> do
4444
cache <- readMVar (env.fetchSession.sharedCache)
4545
EVM.Fetch.saveCache dir (fromIntegral n) cache
46-
(_, Nothing) -> if (env.cfg.rpcUrl /= Nothing)
47-
then putStrLn "Warning: cannot save RPC cache without a specified block number."
48-
else pure ()
46+
(_, Nothing) -> when (isJust (env.cfg.rpcUrl))
47+
$ putStrLn "Warning: cannot save RPC cache without a specified block number."
4948
(Nothing, _) -> pure ()
5049

5150
rpcUrlEnv :: IO (Maybe Text)

0 commit comments

Comments
 (0)