From: Karl Heuer Date: Thu, 6 May 1999 21:26:34 +0000 (+0000) Subject: (timezone-parse-date): Recognize new format used in internet cookies. X-Git-Tag: emacs-20.4~252 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b20bb856de18f3fdd93effd191180c5a39051a70;p=emacs.git (timezone-parse-date): Recognize new format used in internet cookies. --- diff --git a/lisp/timezone.el b/lisp/timezone.el index a7ff21d8310..1b22bde4ee6 100644 --- a/lisp/timezone.el +++ b/lisp/timezone.el @@ -175,6 +175,10 @@ Understands the following styles: "\\([0-9]+\\)[ \t]+\\([^ \t,]+\\)[ \t]+\\([0-9]+\\)[ \t]+\\([0-9]+\\)[ \t]*\\([-+a-zA-Z0-9]+\\)" date) ;; 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]+\\)?[ \t]+\\([-+a-zA-Z0-9]+\\)" date) + ;; Styles: (5) with timezone. + (setq year 3 month 2 day 1 time 4 zone 6)) ((string-match "\\([0-9]+\\)-\\([A-Za-z]+\\)-\\([0-9]+\\)[ \t]+\\([0-9]+:[0-9]+:[0-9]+\\)\\(\\.[0-9]+\\)?" date) ;; Styles: (5) without timezone.