From: Richard M. Stallman Date: Mon, 6 Sep 1999 22:15:43 +0000 (+0000) Subject: (timezone-parse-date): Use < 69 not < 70 to distinguish 20YY from 19YY. X-Git-Tag: emacs-pretest-21.0.90~6865 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=162100b50740f3d5cbed0d7b8b18cfe098e3c5aa;p=emacs.git (timezone-parse-date): Use < 69 not < 70 to distinguish 20YY from 19YY. --- diff --git a/lisp/timezone.el b/lisp/timezone.el index b31677df3d2..8f21f8f3765 100644 --- 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