diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-07-30 16:56:12 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-07-31 21:47:29 +0200 |
| commit | 46df7bbe12cce4c9af7ce4357aa9f8d36c1d8933 (patch) | |
| tree | bb2e88c7866ff6984a2398ec74c69a58bac8b7d5 /test/lisp/calendar/time-date-tests.el | |
| parent | 07ce3be6aa15fdf2092bdf3c60a132d5f4b9c980 (diff) | |
| download | emacs-46df7bbe12cce4c9af7ce4357aa9f8d36c1d8933.tar.gz emacs-46df7bbe12cce4c9af7ce4357aa9f8d36c1d8933.tar.bz2 emacs-46df7bbe12cce4c9af7ce4357aa9f8d36c1d8933.zip | |
Add new function time-zone-format
* lisp/calendar/time-date.el (time-zone-format): New function.
Diffstat (limited to 'test/lisp/calendar/time-date-tests.el')
| -rw-r--r-- | test/lisp/calendar/time-date-tests.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/test/lisp/calendar/time-date-tests.el b/test/lisp/calendar/time-date-tests.el index b46a247cd30..51250ce5e7a 100644 --- a/test/lisp/calendar/time-date-tests.el +++ b/test/lisp/calendar/time-date-tests.el @@ -104,6 +104,12 @@ (should (equal (decoded-time-add time (mdec :zone -7200)) '(12 15 14 8 7 2019 1 t 7200))))) +(ert-deftest test-time-zone-format () + (should (equal (time-zone-format 3600) + "+01:00")) + (should (equal (time-zone-format -7200) + "-02:00"))) + (require 'ert) ;;; time-date-tests.el ends here |