~ chicken-core (chicken-5) 238f99fd393128709959f14464ddd261969a8f4b
commit 238f99fd393128709959f14464ddd261969a8f4b Author: felix <felix@call-with-current-continuation.org> AuthorDate: Mon May 2 14:09:39 2011 +0200 Commit: felix <felix@call-with-current-continuation.org> CommitDate: Mon May 2 14:09:39 2011 +0200 increased connection and read/write tcp timeouts to 30 seconds diff --git a/setup-download.scm b/setup-download.scm index ba31bafe..9ea39bde 100644 --- a/setup-download.scm +++ b/setup-download.scm @@ -40,8 +40,8 @@ (import scheme chicken foreign) (import extras irregex posix utils srfi-1 data-structures tcp srfi-13 files setup-api) - (define-constant +default-tcp-connect-timeout+ 10000) ; 10 seconds - (define-constant +default-tcp-read/write-timeout+ 20000) ; 20 seconds + (define-constant +default-tcp-connect-timeout+ 30000) ; 30 seconds + (define-constant +default-tcp-read/write-timeout+ 30000) ; 30 seconds (define-constant +url-regex+ "(http://)?([^/:]+)(:([^:/]+))?(/.+)")Trap