diff options
| author | Lars Ingebrigtsen | 2019-07-30 11:56:03 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2019-07-30 11:56:03 +0200 |
| commit | e18a4a08e40c83623c7c5c7159de1b772d22303a (patch) | |
| tree | f511b96ab053dda6dc95ebcfde90cd9ba554e421 | |
| parent | 28d1023bbeea7c5c6b0791a48852a12f14785067 (diff) | |
| download | emacs-e18a4a08e40c83623c7c5c7159de1b772d22303a.tar.gz emacs-e18a4a08e40c83623c7c5c7159de1b772d22303a.zip | |
Adjust time-date tests to tweaked format
| -rw-r--r-- | test/lisp/calendar/time-date-tests.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test/lisp/calendar/time-date-tests.el b/test/lisp/calendar/time-date-tests.el index d6cf742bc53..b46a247cd30 100644 --- a/test/lisp/calendar/time-date-tests.el +++ b/test/lisp/calendar/time-date-tests.el | |||
| @@ -35,13 +35,13 @@ | |||
| 35 | 35 | ||
| 36 | (ert-deftest test-ordinal () | 36 | (ert-deftest test-ordinal () |
| 37 | (should (equal (date-ordinal-to-time 2008 271) | 37 | (should (equal (date-ordinal-to-time 2008 271) |
| 38 | '(0 0 0 27 9 2008 nil nil nil))) | 38 | '(nil nil nil 27 9 2008 nil nil nil))) |
| 39 | (should (equal (date-ordinal-to-time 2008 1) | 39 | (should (equal (date-ordinal-to-time 2008 1) |
| 40 | '(0 0 0 1 1 2008 nil nil nil))) | 40 | '(nil nil nil 1 1 2008 nil nil nil))) |
| 41 | (should (equal (date-ordinal-to-time 2008 32) | 41 | (should (equal (date-ordinal-to-time 2008 32) |
| 42 | '(0 0 0 1 2 2008 nil nil nil))) | 42 | '(nil nil nil 1 2 2008 nil nil nil))) |
| 43 | (should (equal (date-ordinal-to-time 1981 095) | 43 | (should (equal (date-ordinal-to-time 1981 095) |
| 44 | '(0 0 0 5 4 1981 nil nil nil)))) | 44 | '(nil nil nil 5 4 1981 nil nil nil)))) |
| 45 | 45 | ||
| 46 | (cl-defmethod mdec (&key second minute hour | 46 | (cl-defmethod mdec (&key second minute hour |
| 47 | day month year | 47 | day month year |