diff options
| author | David Thompson <dthompson2@worcester.edu> | 2022-10-22 08:42:18 -0400 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2022-10-22 08:42:18 -0400 |
| commit | d441bfccfaff17509fba17216ea96792c6c71a77 (patch) | |
| tree | afe3d2e3f24374c4d1a3e5940ced521ed0b7c1ff | |
| parent | e0f6b286ad0101f3f6d7649b98339eef7c90eeb8 (diff) | |
site: Use issue-deprecation-warning for deprecation notification.
| -rw-r--r-- | haunt/site.scm | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/haunt/site.scm b/haunt/site.scm index 225e582..d656943 100644 --- a/haunt/site.scm +++ b/haunt/site.scm @@ -124,11 +124,15 @@ PUBLISHERS: A list of publisher objects for upload site contents to a remote loc (mkdir build-dir)) (for-each (match-lambda ((? page? page) - (display "warning: page objects are deprecated; switch to serialized-artifact\n") + (issue-deprecation-warning + "Page objects are deprecated" + " Use serialized-artifact instead") (format #t "writing page '~a'~%" (page-file-name page)) (write-page page build-dir)) ((? asset? asset) - (display "warning: asset objects are deprecated; switch to verbatim-artifact\n") + (issue-deprecation-warning + "Asset objects are deprecated" + " Use verbatim-artifact instead") (format #t "copying asset '~a' → '~a'~%" (asset-source asset) (asset-target asset)) |