default case

pull/218/head
Matthew Butterick 5 years ago
parent ae8122ce9b
commit 2cd655246c

@ -1 +1 @@
1573244713 1573245169

@ -183,7 +183,8 @@
(pathish? . -> . void?) (pathish? . -> . void?)
(match (->complete-path so-pathish) (match (->complete-path so-pathish)
[(app ->source-path (and (not #false) source-path)) (render-to-file-if-needed source-path)] [(app ->source-path (and (not #false) source-path)) (render-to-file-if-needed source-path)]
[(? pagetree-source? pt) (render-pagenodes pt)])) [(? pagetree-source? pt) (render-pagenodes pt)]
[_ (void)]))
(define render-ram-cache (make-hash)) (define render-ram-cache (make-hash))

Loading…
Cancel
Save