# HG changeset patch # User Glenn Morris # Date 1205462777 0 # Node ID 379d912c3710fac5d7c8316b44b8fe2d7450ab2a # Parent 70290cfccdc1eb45fa7d33deb58405f6dafaf292 (diary-file): Doc fix. (calendar-buffer-list): Return buffers rather than strings (fixes previous change). diff -r 70290cfccdc1 -r 379d912c3710 lisp/calendar/calendar.el --- a/lisp/calendar/calendar.el Fri Mar 14 02:42:04 2008 +0000 +++ b/lisp/calendar/calendar.el Fri Mar 14 02:46:17 2008 +0000 @@ -335,7 +335,7 @@ that date. MONTH and DAY are one or two digit numbers, YEAR is a number and may be written in full or abbreviated to the final two digits (if `abbreviated-calendar-year' is non-nil). MONTHNAME -and DAYNAME can be spelt in full (as specified by the variables +and DAYNAME can be spelled in full (as specified by the variables `calendar-month-name-array' and `calendar-day-name-array'), abbreviated (as specified by `calendar-month-abbrev-array' and `calendar-day-abbrev-array') with or without a period, @@ -1851,13 +1851,13 @@ list)) (defun calendar-buffer-list () - "List of all calendar-related buffers." + "List of all calendar-related buffers (as buffers, not strings)." (let (buffs) (dolist (b (list cal-hebrew-yahrzeit-buffer lunar-phases-buffer holiday-buffer fancy-diary-buffer (get-file-buffer diary-file) calendar-buffer other-calendars-buffer)) - (and b (get-buffer b) + (and b (setq b (get-buffer b)) (push b buffs))) buffs))