(Electric-buffer-menu-mode):

Preserve value of buffer-local var header-line-format.

2 files changed, 8 insertions, 1 deletions

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  <ttn@gnu.org>
+
+        * ebuff-menu.el (Electric-buffer-menu-mode):
+        Preserve value of buffer-local var header-line-format.
+
 2005-01-09  Jay Belanger  <belanger@truman.edu>
 
         * 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")