(timezone-parse-date): Corrected regexp for

style (5) date format so that tenths of seconds are optional.

diff --git a/lisp/timezone.el b/lisp/timezone.el
index 3de071a..a7ff21d 100644 (file)
--- a/lisp/timezone.el
+++ b/lisp/timezone.el
@@ -176,7 +176,7 @@ Understands the following styles:
           ;; Styles: (4) with timezone
           (setq year 3 month 2 day 1 time 4 zone 5))
          ((string-match
-           "\\([0-9]+\\)-\\([A-Za-z]+\\)-\\([0-9]+\\)[ \t]+\\([0-9]+:[0-9]+:[0-9]+\\)\\.[0-9]+" date)
+           "\\([0-9]+\\)-\\([A-Za-z]+\\)-\\([0-9]+\\)[ \t]+\\([0-9]+:[0-9]+:[0-9]+\\)\\(\\.[0-9]+\\)?" date)
           ;; Styles: (5) without timezone.
           (setq year 3 month 2 day 1 time 4 zone nil))
          ((string-match