Changeset 15762 in project


Ignore:
Timestamp:
09/06/09 22:20:59 (10 years ago)
Author:
sjamaan
Message:

401 doesn't mean we cannot retry; it's not a redirect

File:
1 edited

Legend:

Unmodified
Added
Removed
  • release/4/http-client/trunk/http-client.scm

    r15759 r15762  
    326326           (if (and (or (not (max-retry-attempts)) ; unlimited?
    327327                        (<= attempts (max-retry-attempts)))
    328                     ((retry-request?) req)
    329328                    (and (member authtype '(basic digest))))
    330329               (receive (username password)
     
    412411                   ((retry-request?) req))
    413412              (loop (add1 attempts) redirects req)
    414               (signal exn)))
     413              (raise exn)))
    415414     (exn ()
    416415          ;; Never leave the port in an unknown/inconsistent state
Note: See TracChangeset for help on using the changeset viewer.