diff --git a/pollen/private/ts.rktd b/pollen/private/ts.rktd index e4bc76b..b5d5b89 100644 --- a/pollen/private/ts.rktd +++ b/pollen/private/ts.rktd @@ -1 +1 @@ -1572991275 +1572991771 diff --git a/pollen/render.rkt b/pollen/render.rkt index 22e595f..9e59105 100644 --- a/pollen/render.rkt +++ b/pollen/render.rkt @@ -66,9 +66,9 @@ #:break (null? paths)) (match (->complete-path (car paths)) [(? pagetree-source? pt) (values (append (pagetree->paths pt) (cdr paths)) acc)] - [(? ->source-path sp) #:when (file-exists? sp) (values (cdr paths) (cons sp acc))] + [(app ->source-path (and (not #false) (? file-exists?) sp)) (values (cdr paths) (cons sp acc))] [_ (values (cdr paths) acc)]))) - + (define job-count (match wants-parallel-render [#true (processor-count)]