Skip to content
Permalink
Browse files

improve comments for 'defaultRetryPolicy'

  • Loading branch information...
KtorZ committed Jun 12, 2019
1 parent 669dc05 commit 29a490a6f9553dfac7ad97e64b3ec15a2c2f0e1e
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 29a490a

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