From 724ec4be50c0b86f0e36f6660848e2c2845a146c Mon Sep 17 00:00:00 2001 From: Matthew Butterick Date: Tue, 30 Oct 2018 14:29:04 -0700 Subject: [PATCH] mo message --- pollen/render.rkt | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/pollen/render.rkt b/pollen/render.rkt index ea2f100..58dfa7b 100644 --- a/pollen/render.rkt +++ b/pollen/render.rkt @@ -107,7 +107,7 @@ #:dest-path 'output #:notify-cache-use (λ (str) - (message (format "loading from cache /~a" + (message (format "from cache /~a" (find-relative-path (current-project-root) output-path))))))))) ; will either be string or bytes (display-to-file render-result output-path #:exists 'replace @@ -147,6 +147,8 @@ (define template-path (or maybe-template-path (get-template-for source-path output-path))) ;; output-path and template-path may not have an extension, so check them in order with fallback + (message (format "rendering /~a" + (find-relative-path (current-project-root) source-path))) (match-define-values ((cons render-result _) _ real _) (parameterize ([current-poly-target (->symbol (or (get-ext output-path) (and template-path (get-ext template-path)) @@ -154,8 +156,7 @@ (time-apply render-proc (list source-path template-path output-path)))) ;; wait till last possible moment to store mod dates, because render-proc may also trigger its own subrenders ;; e.g., of a template. - (message (format "rendered /~a as /~a (~a ms)" - (find-relative-path (current-project-root) source-path) + (message (format "rendered as /~a (~a ms)" (find-relative-path (current-project-root) output-path) real)) (update-mod-date-hash! source-path template-path)