emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] master c34801f: Update iso8601-tests for new interface


From: Lars Ingebrigtsen
Subject: [Emacs-diffs] master c34801f: Update iso8601-tests for new interface
Date: Sun, 29 Sep 2019 15:58:07 -0400 (EDT)

branch: master
commit c34801f8838c4b91378c3e0d961aca826a923e95
Author: Lars Ingebrigtsen <address@hidden>
Commit: Lars Ingebrigtsen <address@hidden>

    Update iso8601-tests for new interface
---
 test/lisp/calendar/iso8601-tests.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/test/lisp/calendar/iso8601-tests.el 
b/test/lisp/calendar/iso8601-tests.el
index 1d44e94..b5a3c95 100644
--- a/test/lisp/calendar/iso8601-tests.el
+++ b/test/lisp/calendar/iso8601-tests.el
@@ -154,23 +154,23 @@
                  '(0 0 15 nil nil nil nil nil nil))))
 
 (ert-deftest standard-test-time-of-day-fractions ()
-  (should (equal (iso8601-parse-time "152735,5")
+  (should (equal (iso8601-parse-time "152735,5" t)
                  '((355 . 10) 27 15 nil nil nil nil nil nil)))
-  (should (equal (iso8601-parse-time "15:27:35,5")
+  (should (equal (iso8601-parse-time "15:27:35,5" t)
                  '((355 . 10) 27 15 nil nil nil nil nil nil)))
 
-  (should (equal (iso8601-parse-time "2320,5")
+  (should (equal (iso8601-parse-time "2320,5" t)
                  '(30 20 23 nil nil nil nil nil nil)))
-  (should (equal (iso8601-parse-time "23:20,8")
+  (should (equal (iso8601-parse-time "23:20,8" t)
                  '(48 20 23 nil nil nil nil nil nil)))
 
-  (should (equal (iso8601-parse-time "23,3")
+  (should (equal (iso8601-parse-time "23,3" t)
                  '(0 18 23 nil nil nil nil nil nil))))
 
 (ert-deftest nonstandard-test-time-of-day-decimals ()
-  (should (equal (iso8601-parse-time "15:27:35.123")
+  (should (equal (iso8601-parse-time "15:27:35.123" t)
                  '((35123 . 1000) 27 15 nil nil nil nil nil nil)))
-  (should (equal (iso8601-parse-time "15:27:35.123456789")
+  (should (equal (iso8601-parse-time "15:27:35.123456789" t)
                  '((35123456789 . 1000000000) 27 15 nil nil nil nil nil nil))))
 
 (ert-deftest standard-test-time-of-day-beginning-of-day ()



reply via email to

[Prev in Thread] Current Thread [Next in Thread]