[Top][All Lists]
[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