fix project server routes to work with files in subdirs

pollen/private/project-server.rkt

@@ -15,9 +15,9 @@
 (define (start-server)
   (define-values (pollen-servlet _)
     (dispatch-rules
-     [((string-arg) ... (? pagetree-source?)) route-dashboard]
+     [((? pagetree-source?)) route-dashboard]
-     [((string-arg) ... "in" (string-arg)) route-in]
+     [("in" (string-arg) ...) route-in]
-     [((string-arg) ... "out" (string-arg)) route-out]
+     [("out" (string-arg) ...) route-out]
      [else route-default]))
   
   (message (format "Welcome to Pollen ~a" pollen:version) (format "(Racket ~a)" (version)))

pollen/private/ts.rktd

@@ -1 +1 @@
-1469749257
+1469749293