From: Thien-Thi Nguyen Date: Mon, 10 Jan 2005 11:56:07 +0000 (+0000) Subject: (Electric-buffer-menu-mode): X-Git-Tag: ttn-vms-21-2-B4~2834 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e4edc5cd31cad3720c03f59e145dc9c5d66c4d57;p=emacs.git (Electric-buffer-menu-mode): Preserve value of buffer-local var header-line-format. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index e5e5cc56f8a..17a16d0cfb9 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-01-10 Thien-Thi Nguyen + + * ebuff-menu.el (Electric-buffer-menu-mode): + Preserve value of buffer-local var header-line-format. + 2005-01-09 Jay Belanger * calc/calc.el (calc-mode-var-list-restore-saved-values): diff --git a/lisp/ebuff-menu.el b/lisp/ebuff-menu.el index 2bfbace4c4b..bfac2afe6e9 100644 --- a/lisp/ebuff-menu.el +++ b/lisp/ebuff-menu.el @@ -149,7 +149,9 @@ Letters do not insert themselves; instead, they are commands. Entry to this mode via command `electric-buffer-list' calls the value of `electric-buffer-menu-mode-hook'." - (kill-all-local-variables) + (let ((saved header-line-format)) + (kill-all-local-variables) + (setq header-line-format saved)) (use-local-map electric-buffer-menu-mode-map) (setq mode-name "Electric Buffer Menu") (setq mode-line-buffer-identification "Electric Buffer List")