emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: 23.0.50; Holidays from year 2007 are displayed in a buffer named 200


From: Mark A. Hershberger
Subject: Re: 23.0.50; Holidays from year 2007 are displayed in a buffer named 2002
Date: Sat, 24 Nov 2007 14:45:37 -0500
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/23.0.60 (gnu/linux)

Peter Dyballa <address@hidden> writes:

> When I then choose year 2007 from the Holidays menu the holidays
> buffer has "Holidays for 2002" in its mode line – and the holiday
> dates are recorded as coming from 2002, which I can't check further,
> because my oldest calendar is from 2005

I was able to reproduce this with the latest CVS snapshot.

I've applied the following patch to fix it:

*** cal-menu.el.~1.76.~ 2007-11-21 23:17:17.000000000 -0500
--- cal-menu.el 2007-11-24 14:38:15.000000000 -0500
***************
*** 95,107 ****
      ,@(let ((l ()))
          ;; Show 11 years--5 before, 5 after year of middle month.
          (dotimes (i 11)
!           (push (vector "For Year"
!                         `(lambda ()
!                            (interactive)
!                            (holiday-list (+ displayed-year ,(- i 5))
!                                          (+ displayed-year ,(- i 5))))
!                         :suffix `(number-to-string (+ displayed-year ,(- i 
5))))
!                 l))
          (nreverse l))
      "--"
      ["Unmark Calendar" calendar-unmark]
--- 95,105 ----
      ,@(let ((l ()))
          ;; Show 11 years--5 before, 5 after year of middle month.
          (dotimes (i 11)
!         (let ((y (+ 2007 -5 i)))
!           (push (vector (format "For Year %s" y)
!                         (list (list 'lambda 'nil '(interactive)
!                                     (list 'list-holidays y y))))
!                 l)))
          (nreverse l))
      "--"
      ["Unmark Calendar" calendar-unmark]


-- 
http://hexmode.com/
GPG Fingerprint: 7E15 362D A32C DFAB E4D2  B37A 735E F10A 2DFC BFF5

The most beautiful experience we can have is the mysterious.
    -- Albert Einstein, The World As I See it





reply via email to

[Prev in Thread] Current Thread [Next in Thread]