updates

server-routes.rkt

@@ -103,11 +103,10 @@
   (define leftover-files (filter (λ(f) (and
                                         (not (equal? (->string f) "polcom")) ;todo: generalize this test
                                         (not ((->string f) . starts-with? . "."))
-                                        (not (f . in? . all-pollen-files)))) 
+                                        (not (f . in? . all-pollen-files))
+                                        (not (f . in? . all-preproc-files)))) 
                                  (directory-list pollen-project-directory)))
   
-  (message leftover-files)
-  
   ;; Utility function for making file rows
   (define (make-file-row file routes)
     ;; Utility function for making cells