mbutterick
/
pollen
3
3
Fork 0
Code Issues 1 Pull Requests Projects Releases Wiki Activity

better time

Browse Source
dev-stylish
Matthew Butterick 6 years ago
parent 1a0e9d1484
commit 72c6fbc3e0
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File

6
pollen/render.rkt
Unescape Escape View File

@ -156,9 +156,11 @@
(time-apply render-proc (list source-path template-path output-path)))) (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 ;; wait till last possible moment to store mod dates, because render-proc may also trigger its own subrenders
;; e.g., of a template. ;; e.g., of a template.
(message (format "rendered /~a (~a ms)" (message (format "rendered /~a ~a"
(find-relative-path (current-project-root) output-path) (find-relative-path (current-project-root) output-path)
real)) (if (< real 1000)
(format "(~a ms)" real)
(format "(~a s)" (/ real 1000)))))
(update-mod-date-hash! source-path template-path) (update-mod-date-hash! source-path template-path)
render-result) render-result)

Write Preview
Loading…
Cancel
Save