Github/emacs
2
0
Fork 1
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-18 10:57:34 +00:00
Code Issues Projects Releases Packages Wiki Activity

Minor fixes of earlier updates.

Browse source
This commit is contained in:
Edward M. Reingold 1998-05-28 01:12:18 +00:00
parent 15c1f6fe16
commit 9c73a356b0
1 changed files with 6 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
lisp/calendar/calendar.el
View file

@ -2029,8 +2029,10 @@ For a complete description, type \
(setq buffer-read-only t)
(setq indent-tabs-mode nil)
(update-calendar-mode-line)
(make-local-hook 'activate-menubar-hook)
(add-hook 'activate-menubar-hook 'cal-menu-update nil t)
(if window-system
(progn
(make-local-hook 'activate-menubar-hook)
(add-hook 'activate-menubar-hook 'cal-menu-update nil t)))
(make-local-variable 'calendar-mark-ring)
(make-local-variable 'displayed-month);; Month in middle of window.
(make-local-variable 'displayed-year));; Year in middle of window.
@ -2084,7 +2086,8 @@ the STRINGS are just concatenated and the result truncated."
"List of all calendar-related buffers."
(let* ((diary-buffer (get-file-buffer diary-file))
(buffers (list "*Yahrzeits*" lunar-phases-buffer holiday-buffer
fancy-diary-buffer diary-buffer calendar-buffer))
fancy-diary-buffer diary-buffer calendar-buffer
other-calendars-buffer))
(buffer-list nil)
b)
(while buffers