[Emacs-diffs] emacs/lisp ChangeLog calendar/cal-dst.el

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/06/10 01:33:00

Modified files:
        lisp           : ChangeLog 
        lisp/calendar  : cal-dst.el 

Log message:
        (calendar-time-zone-daylight-rules): Fix typo in 2008-04-02 change.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.15676&r2=1.15677
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/calendar/cal-dst.el?cvsroot=emacs&r1=1.49&r2=1.50

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.15676
retrieving revision 1.15677
diff -u -b -r1.15676 -r1.15677
--- ChangeLog   10 Jun 2009 00:35:08 -0000      1.15676
+++ ChangeLog   10 Jun 2009 01:32:55 -0000      1.15677
@@ -1,3 +1,8 @@
+2009-06-10  Glenn Morris  <address@hidden>
+
+       * calendar/cal-dst.el (calendar-time-zone-daylight-rules):
+       Fix typo in 2008-04-02 change.
+
 2009-06-10  Kenichi Handa  <address@hidden>
 
        * composite.el (compose-gstring-for-terminal): For zero-width

Index: calendar/cal-dst.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/calendar/cal-dst.el,v
retrieving revision 1.49
retrieving revision 1.50
diff -u -b -r1.49 -r1.50
--- calendar/cal-dst.el 5 Jan 2009 03:20:32 -0000       1.49
+++ calendar/cal-dst.el 10 Jun 2009 01:32:59 -0000      1.50
@@ -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))