From 580868e1f724c99cf1861728e53b2b1903fcd7f2 Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Thu, 28 Jul 2016 16:41:33 -0700 Subject: [PATCH] fix project server routes to work with files in subdirs --- pollen/private/project-server.rkt | 6 +++--- pollen/private/ts.rktd | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/pollen/private/project-server.rkt b/pollen/private/project-server.rkt index 90d28da..adc3e37 100755 --- a/pollen/private/project-server.rkt +++ b/pollen/private/project-server.rkt @@ -15,9 +15,9 @@ (define (start-server) (define-values (pollen-servlet _) (dispatch-rules - [((string-arg) ... (? pagetree-source?)) route-dashboard] - [((string-arg) ... "in" (string-arg)) route-in] - [((string-arg) ... "out" (string-arg)) route-out] + [((? pagetree-source?)) route-dashboard] + [("in" (string-arg) ...) route-in] + [("out" (string-arg) ...) route-out] [else route-default])) (message (format "Welcome to Pollen ~a" pollen:version) (format "(Racket ~a)" (version))) diff --git a/pollen/private/ts.rktd b/pollen/private/ts.rktd index 3ff00e7..bc772f0 100644 --- a/pollen/private/ts.rktd +++ b/pollen/private/ts.rktd @@ -1 +1 @@ -1469749257 +1469749293