Skip to content
Permalink
Browse files

improve comments for 'defaultRetryPolicy'

  • Loading branch information...
KtorZ authored and Anviking committed Jun 12, 2019
1 parent d2b14fa commit e46b2fa48b2f059107bdb6f65e9800a89f25af78
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 e46b2fa

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