Skip to content
Permalink
Browse files

improve comments for 'defaultRetryPolicy'

  • Loading branch information...
KtorZ authored and Anviking committed Jun 12, 2019
1 parent d9c6d1d commit 988ddc185447a2f7fd98d3e715e58058b63d290f
Showing with 2 additions and 2 deletions.
  1. +2 −2 lib/core/src/Cardano/Wallet/Network.hs
@@ -94,8 +94,8 @@ waitForConnection nw policy = do
Left (ErrNetworkTipNetworkUnreachable _) ->
return True

-- | A default 'RetryPolicy' with a constant delay, but no longer than 20
-- seconds.
-- | A default 'RetryPolicy' with a constant delay, but retries for no longer
-- than 20 seconds.
defaultRetryPolicy :: Monad m => RetryPolicyM m
defaultRetryPolicy =
limitRetriesByCumulativeDelay (20 * second) (constantDelay (1 * second))

0 comments on commit 988ddc1

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