From e4edc5cd31cad3720c03f59e145dc9c5d66c4d57 Mon Sep 17 00:00:00 2001 From: Thien-Thi Nguyen Date: Mon, 10 Jan 2005 11:56:07 +0000 Subject: [PATCH] (Electric-buffer-menu-mode): Preserve value of buffer-local var header-line-format. --- lisp/ChangeLog | 5 +++++ lisp/ebuff-menu.el | 4 +++- 2 files changed, 8 insertions(+), 1 deletion(-) 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") -- 2.39.5