From 534b8ee6015a61ca3aa9629a45d823360744cc77 Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Thu, 24 Sep 2015 17:39:26 -0400 Subject: [PATCH] dynamic-urlprefix in authentication-wrap*. --- src/site.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/site.rkt b/src/site.rkt index d25d8ec..897847f 100644 --- a/src/site.rkt +++ b/src/site.rkt @@ -149,7 +149,7 @@ (define requested-url (url->string (request-uri request))) (if (and require-login? (not session)) - (login-or-register-flow* requested-url login-form) + (login-or-register-flow* (string-append dynamic-urlprefix requested-url) login-form) (parameterize ((bootstrap-navbar-extension (cond [(not session)