@@ -728,11 +728,11 @@
 ;; 	#t
 ;; 	#f)))
 
 ;; timeout is hms string: 1h 5m 3s, default is 1 minute
 ;; This is currently broken. Just use the number of hours with no unit.
-;; Default is 60 seconds.
+;; Default is 600 seconds.
 ;;
 (define (server:expiration-timeout)
   (let* ((tmo (configf:lookup *configdat* "server" "timeout")))
     (if (string? tmo)
 	(let* ((num (string->number tmo)))