Use the time-to-live argument in really-session-adjust-timeout!

2003-03-10 13:01:45 +00:00 · 2003-03-10 13:01:45 +00:00 · 64371c9941
parent 909ed39ce2
commit 64371c9941
1 changed files with 1 additions and 2 deletions
--- a/scheme/httpd/surflets/surflet-handler.scm
+++ b/scheme/httpd/surflets/surflet-handler.scm
@ -335,8 +335,7 @@
 	 (new-memo (make-default-memo)))
    ;; Do it this way: new values and then new message
    (set-memo:value memo 
-		    (+ (time) 
-		       (options-session-lifetime)))
+		    (+ (time) time-to-live))
    (set-memo:new-memo memo new-memo)
    ;; I don't think we need locking here. Do you agree?
    (set-session-memo! session new-memo)