branch: externals/org commit eb3bccb1fe4ecd6fdcfbfc23803ee78461e7fc9b Author: Lukas Epple <em...@lukasepple.de> Commit: Ihor Radchenko <yanta...@posteo.net>
testing/lisp/test-ox-html.el: Add test for timestamp rendering --- testing/lisp/test-ox-html.el | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) diff --git a/testing/lisp/test-ox-html.el b/testing/lisp/test-ox-html.el index ec8a7b18fd..d969a56698 100644 --- a/testing/lisp/test-ox-html.el +++ b/testing/lisp/test-ox-html.el @@ -894,6 +894,29 @@ $x$" (with-current-buffer export-buffer (libxml-parse-xml-region (point-min) (point-max)))))))) + +;;; Rendering Timestamps + +(ert-deftest ox-html/plain-timestamps () + "Test rendering of timestamps (outside of clock/planning)" + (org-test-with-temp-text " +- [2025-01-31 Fri] +- [2025-01-31 Fri 14:00] +- <2025-02-18 Tue> +- <2025-02-18 Tue 23:59> +- [2025-02-17 Tue 17:00]--[2025-02-17 Fri 19:00] +" + (let ((export-buffer "*Test HTML Export") + (org-export-show-temporary-buffer nil)) + (org-export-to-buffer 'html export-buffer + nil nil nil t) + (with-current-buffer export-buffer + (mapc (lambda (s) (should (search-forward s nil t))) + '("<span class=\"timestamp\">[2025-01-31 Fri]</span>" + "<span class=\"timestamp\">[2025-01-31 Fri 14:00]</span>" + "<span class=\"timestamp\"><2025-02-18 Tue></span>" + "<span class=\"timestamp\"><2025-02-18 Tue 23:59></span>" + "<span class=\"timestamp\">[2025-02-17 Mon 17:00]–[2025-02-17 Mon 19:00]</span>")))))) ;;; Postamble Format