diff options
| author | Stefan Kangas | 2025-01-12 22:41:30 +0100 |
|---|---|---|
| committer | Stefan Kangas | 2025-01-13 01:05:42 +0100 |
| commit | ccd927d741df928d4de578dffac74bc67d24c8b0 (patch) | |
| tree | d19e12f45d8903c2f4bcbe82124073257c231fc6 /test/src/timefns-tests.el | |
| parent | 85c73bb901e2adbad78e19c9a4f4d1ef74ac3d6d (diff) | |
| download | emacs-ccd927d741df928d4de578dffac74bc67d24c8b0.tar.gz emacs-ccd927d741df928d4de578dffac74bc67d24c8b0.zip | |
Use eabs in Fcurrent_time_zone
* src/timefns.c (Fcurrent_time_zone): Use eabs.
* test/src/timefns-tests.el
(timefns-tests-current-time-zone): New test.
Diffstat (limited to 'test/src/timefns-tests.el')
| -rw-r--r-- | test/src/timefns-tests.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/test/src/timefns-tests.el b/test/src/timefns-tests.el index 3e75a3f9b63..89a199f37fc 100644 --- a/test/src/timefns-tests.el +++ b/test/src/timefns-tests.el | |||
| @@ -261,4 +261,8 @@ a fixed place on the right and are padded on the left." | |||
| 261 | (should (time-equal-p time- (time-convert time- form))) | 261 | (should (time-equal-p time- (time-convert time- form))) |
| 262 | (should (time-equal-p time+ (time-convert time+ form)))))))) | 262 | (should (time-equal-p time+ (time-convert time+ form)))))))) |
| 263 | 263 | ||
| 264 | (ert-deftest current-time-zone () | ||
| 265 | (should (listp (current-time-zone))) | ||
| 266 | (should (= (length (current-time-zone)) 2))) | ||
| 267 | |||
| 264 | ;;; timefns-tests.el ends here | 268 | ;;; timefns-tests.el ends here |