diff options
Diffstat (limited to 'test/glep-mode-tests.el')
-rw-r--r-- | test/glep-mode-tests.el | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/test/glep-mode-tests.el b/test/glep-mode-tests.el index 7318293..cc2e162 100644 --- a/test/glep-mode-tests.el +++ b/test/glep-mode-tests.el @@ -24,7 +24,12 @@ (require 'glep-mode) (defmacro glep-mode-test-run-with-fixed-time (&rest body) - `(cl-letf* ((fixed-time (date-to-time "2024-08-10 00:00:00 +0000")) + `(cl-letf* ((calendrical '(0 0 0 10 8 2024 nil nil 0)) + (fixed-time (condition-case nil + ;; new calling convention since Emacs 27 + (encode-time calendrical) + (wrong-number-of-arguments + (apply #'encode-time calendrical)))) (orig-fun (symbol-function 'format-time-string)) ((symbol-function 'format-time-string) (lambda (fmt-string &optional time zone) |