From b7014632a628bfb2a44fdb426e7ab145cc6a2eb5 Mon Sep 17 00:00:00 2001 From: Glenn Morris Date: Wed, 6 Jun 2012 14:46:34 -0400 Subject: [PATCH] Fix previous calendar-in-read-only-buffer change. Otherwise all the mode-lines get clobbered. --- lisp/calendar/calendar.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/calendar/calendar.el b/lisp/calendar/calendar.el index 33cb57b352d..0d6ea8e7f4c 100644 --- a/lisp/calendar/calendar.el +++ b/lisp/calendar/calendar.el @@ -1112,6 +1112,7 @@ with disabled undo. Leaves point at point-min, displays BUFFER." (declare (indent 1) (debug t)) `(progn (set-buffer (get-buffer-create ,buffer)) + (special-mode) (setq buffer-read-only nil buffer-undo-list t) (erase-buffer) @@ -1119,7 +1120,6 @@ with disabled undo. Leaves point at point-min, displays BUFFER." (goto-char (point-min)) (set-buffer-modified-p nil) (setq buffer-read-only t) - (special-mode) (display-buffer ,buffer))) ;; The following are in-line for speed; they can be called thousands of times -- 2.39.2