summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/lisp/calendar/iso8601-tests.el26
1 files changed, 19 insertions, 7 deletions
diff --git a/test/lisp/calendar/iso8601-tests.el b/test/lisp/calendar/iso8601-tests.el
index 35c319ed036..8d2aec3de5a 100644
--- a/test/lisp/calendar/iso8601-tests.el
+++ b/test/lisp/calendar/iso8601-tests.el
@@ -153,13 +153,25 @@
(should (equal (iso8601-parse-time "15")
'(0 0 15 nil nil nil nil nil nil))))
-(ert-deftest standard-test-time-of-day-fractions ()
- ;; decoded-time doesn't support sub-second times.
- ;; (should (equal (iso8601-parse-time "152735,5")
- ;; '(46 27 15 nil nil nil nil nil nil)))
- ;; (should (equal (iso8601-parse-time "15:27:35,5")
- ;; '(46 27 15 nil nil nil nil nil nil)))
- )
+;; Not implemented yet.
+
+;; (ert-deftest standard-test-time-of-day-fractions ()
+;; (should (equal (iso8601-parse-time "152735,5")
+;; '(46 27 15 nil nil nil nil nil nil)))
+;; (should (equal (iso8601-parse-time "15:27:35,5")
+;; '(46 27 15 nil nil nil nil nil nil)))
+
+;; (should (equal (iso8601-parse-time "2320,8")
+;; '(46 27 15 nil nil nil nil nil nil)))
+;; (should (equal (iso8601-parse-time "23:20,8")
+;; '(46 27 15 nil nil nil nil nil nil)))
+
+;; (should (equal (iso8601-parse-time "23,3")
+;; '(46 27 15 nil nil nil nil nil nil))))
+
+;; (ert-deftest nonstandard-test-time-of-day-decimals ()
+;; (should (equal (iso8601-parse-time "15:27:35.123")
+;; '(46 27 15 nil nil nil nil nil nil))))
(ert-deftest standard-test-time-of-day-beginning-of-day ()
(should (equal (iso8601-parse-time "000000")