diff options
| author | Alex Schroeder <alex@gnu.org> | 2003-11-13 18:20:08 +0000 |
|---|---|---|
| committer | Alex Schroeder <alex@gnu.org> | 2003-11-13 18:20:08 +0000 |
| commit | a996695f9316c5ec9d951034ba069c862d6dc3fe (patch) | |
| tree | f6a8e2589d70561ab46da5aac0bd9095e423c1a7 /lisp/timezone.el | |
| parent | dd429b0302cebff1002c7c8770ece25bdd1f89fd (diff) | |
| download | emacs-a996695f9316c5ec9d951034ba069c862d6dc3fe.tar.gz | |
(timezone-parse-date): Fix style 8 to accept ISO
8601 format (a capital T between the date and the time).
Diffstat (limited to 'lisp/timezone.el')
| -rw-r--r-- | lisp/timezone.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/timezone.el b/lisp/timezone.el index 90a5ac37de5..bad269d9cbc 100644 --- a/lisp/timezone.el +++ b/lisp/timezone.el @@ -191,11 +191,11 @@ Understands the following styles: ;; Styles: (8) with timezone. (setq year 1 month 2 day 3 time 4 zone 5)) ((string-match - "\\([0-9]+\\)-\\([0-9]+\\)-\\([0-9]+\\)[ \t]+\\([0-9]+:[0-9]+\\)[ \t]+\\([-+a-zA-Z0-9:]+\\)" date) + "\\([0-9]+\\)-\\([0-9]+\\)-\\([0-9]+\\)[T \t]+\\([0-9]+:[0-9]+\\)[ \t]+\\([-+a-zA-Z0-9:]+\\)" date) ;; Styles: (8) with timezone with a colon in it. (setq year 1 month 2 day 3 time 4 zone 5)) ((string-match - "\\([0-9]+\\)-\\([0-9]+\\)-\\([0-9]+\\)[ \t]+\\([0-9]+:[0-9]+:[0-9]+\\)" date) + "\\([0-9]+\\)-\\([0-9]+\\)-\\([0-9]+\\)[T \t]+\\([0-9]+:[0-9]+:[0-9]+\\)" date) ;; Styles: (8) without timezone. (setq year 1 month 2 day 3 time 4 zone nil)) ) |