Mercurial > emacs

diff lisp/calendar/cal-dst.el @ 103371:261b17f9df8e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(calendar-time-zone-daylight-rules): Fix typo in 2008-04-02 change.
author Glenn Morris <rgm@gnu.org>
date Wed, 10 Jun 2009 01:32:55 +0000
parents a9dc0e7c3f2b
children decf5e666b9e
line wrap: on
line diff
--- a/lisp/calendar/cal-dst.el	Wed Jun 10 01:27:10 2009 +0000
+++ b/lisp/calendar/cal-dst.el	Wed Jun 10 01:32:55 2009 +0000
@@ -229,7 +229,7 @@
         (setq date (cond ((eq (car rule) 'calendar-nth-named-day)
                           (eval (cons 'calendar-nth-named-absday (cdr rule))))
                          ((eq (car rule) 'calendar-gregorian-from-absolute)
-                          (eval (cdr rule)))
+                          (eval (cadr rule)))
                          (t (calendar-absolute-from-gregorian (eval rule)))))
         (or (equal (current-time-zone
                     (calendar-time-from-absolute date prevday-sec))