(timezone-parse-date): Use < 69 not < 70 to distinguish 20YY from 19YY.

diff --git a/lisp/timezone.el b/lisp/timezone.el
index b31677df3d2952a11f294f1fae5f688c4ab8f10a..8f21f8f3765c6a18e48de952c491081f93f019ac 100644 (file)
--- a/lisp/timezone.el
+++ b/lisp/timezone.el
@@ -196,12 +196,12 @@ Understands the following styles:
          )
     (when year
       (setq year (match-string year date))
-      ;; Guess ambiguous years.  Assume years < 70 don't predate the
+      ;; Guess ambiguous years.  Assume years < 69 don't predate the
       ;; Unix Epoch, so are 2000+.  Three-digit years -- do they ever
       ;; occur? -- are (arbitrarily) assumed to be 21st century.
       (if (< (length year) 4)
          (let ((y (string-to-int year)))
-           (if (< y 70)
+           (if (< y 69)
                (setq y (+ y 100)))
            (setq year (int-to-string (+ 1900 y)))))
       (setq month