diff options
| author | Karl Heuer <kwzh@gnu.org> | 1999-05-06 21:26:34 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1999-05-06 21:26:34 +0000 |
| commit | bdd29a79a74393dfca38e72ce575d870ba18bef2 (patch) | |
| tree | 0555b730bb2f6068819849160582aff7ab8c7d83 /lisp/timezone.el | |
| parent | 2feddd130447f469548808784dc4be6f8e82179a (diff) | |
| download | emacs-bdd29a79a74393dfca38e72ce575d870ba18bef2.tar.gz | |
(timezone-parse-date): Recognize new format used in internet cookies.
Diffstat (limited to 'lisp/timezone.el')
| -rw-r--r-- | lisp/timezone.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/timezone.el b/lisp/timezone.el index a7ff21d8310..1b22bde4ee6 100644 --- a/lisp/timezone.el +++ b/lisp/timezone.el @@ -176,6 +176,10 @@ 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]+\\)?[ \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. (setq year 3 month 2 day 1 time 4 zone nil)) |