From 9c8272204b143b6eeb7db98251f2cf763946d036 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Tue, 9 Jun 2015 17:27:19 -0700 Subject: [PATCH] accept any value for force in url query string --- server-routes.rkt | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/server-routes.rkt b/server-routes.rkt index 0fd96a7..d20f0ff 100644 --- a/server-routes.rkt +++ b/server-routes.rkt @@ -222,7 +222,7 @@ ;; default route (define (route-default req) (logger req) - (define force (equal? (get-query-value (request-uri req) 'force) "true")) + (define force (->boolean (get-query-value (request-uri req) 'force))) (render-from-source-or-output-path (req->path req) #:force force) (next-dispatcher))