From d2bd2cd63e77d234a2153c9f204527437a78cd0b Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Tue, 21 Feb 2017 15:01:46 -0500 Subject: [PATCH] Login links now expire in 24h, rather than 10s (!) --- examples/webchat/server/pages.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/examples/webchat/server/pages.rkt b/examples/webchat/server/pages.rkt index c5f41c5..d6667b7 100644 --- a/examples/webchat/server/pages.rkt +++ b/examples/webchat/server/pages.rkt @@ -225,7 +225,7 @@ (stop-when (asserted (session _ sid))) ;; happy path (stop-when (message (end-session sid))) (stop-when (message (delete-resource (account email)))) - (stop-when-timeout (* 10 1000)))) ;; 10 seconds + (stop-when-timeout (* (* 24 3600) 1000)))) ;; 24h = 1 day (define (login-link-emailed-page id maybe-insecure-validation-url) (web-respond/pretty-xexpr!