[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 24b60b7 1/2: Port standard-test-interval to Los Ang
From: |
Paul Eggert |
Subject: |
[Emacs-diffs] master 24b60b7 1/2: Port standard-test-interval to Los Angeles |
Date: |
Thu, 1 Aug 2019 18:47:21 -0400 (EDT) |
branch: master
commit 24b60b75ea544f0c2df740d40592c6665c123523
Author: Paul Eggert <address@hidden>
Commit: Paul Eggert <address@hidden>
Port standard-test-interval to Los Angeles
* test/lisp/calendar/iso8601-tests.el (standard-test-interval):
Use UTC to avoid DST glitches in the test.
---
test/lisp/calendar/iso8601-tests.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/test/lisp/calendar/iso8601-tests.el
b/test/lisp/calendar/iso8601-tests.el
index 2959f54..35c319e 100644
--- a/test/lisp/calendar/iso8601-tests.el
+++ b/test/lisp/calendar/iso8601-tests.el
@@ -228,14 +228,14 @@
;; A time interval starting at 20 minutes and 50 seconds past 23
;; hours on 12 April 1985 and ending at 30 minutes past 10 hours on
;; 25 June 1985.
- (should (equal (iso8601-parse-interval "19850412T232050/19850625T103000")
- '((50 20 23 12 4 1985 nil nil nil)
- (0 30 10 25 6 1985 nil nil nil)
+ (should (equal (iso8601-parse-interval "19850412T232050Z/19850625T103000Z")
+ '((50 20 23 12 4 1985 nil nil 0)
+ (0 30 10 25 6 1985 nil nil 0)
(10 9 11 15 3 1970 0 nil 0))))
(should (equal (iso8601-parse-interval
- "1985-04-12T23:20:50/1985-06-25T10:30:00")
- '((50 20 23 12 4 1985 nil nil nil)
- (0 30 10 25 6 1985 nil nil nil)
+ "1985-04-12T23:20:50Z/1985-06-25T10:30:00Z")
+ '((50 20 23 12 4 1985 nil nil 0)
+ (0 30 10 25 6 1985 nil nil 0)
(10 9 11 15 3 1970 0 nil 0))))
;; A time interval starting at 12 April 1985 and ending on 25 June