move a message

pull/218/head
Matthew Butterick 5 years ago
parent 4583bce7b2
commit ffade6761b

@ -1 +1 @@
1573246118 1573261682

@ -159,9 +159,8 @@
[(app ->source-path (and (not #false) (? file-exists?) sp)) (loop (cdr paths) (cons sp acc))] [(app ->source-path (and (not #false) (? file-exists?) sp)) (loop (cdr paths) (cons sp acc))]
[_ (loop (cdr paths) acc)]))) [_ (loop (cdr paths) acc)])))
(cond (cond
[wants-dry-run? (if (null? expanded-source-paths) [(null? expanded-source-paths) (message "[no paths to render]")]
(message "[no paths to render]") [wants-dry-run? (for-each message expanded-source-paths)]
(for-each message expanded-source-paths))]
[else (for-each render-to-file-if-needed [else (for-each render-to-file-if-needed
(match wants-parallel-render? (match wants-parallel-render?
;; returns crashed jobs for serial rendering ;; returns crashed jobs for serial rendering

Loading…
Cancel
Save