changeset 59453:1312906d3476

(Electric-buffer-menu-mode): Preserve value of buffer-local var header-line-format.
author Thien-Thi Nguyen <ttn@gnuvola.org>
date Mon, 10 Jan 2005 11:54:08 +0000
parents 139dd24b2c1c
children 9007a66f8c7a
files lisp/ebuff-menu.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ebuff-menu.el	Mon Jan 10 05:01:27 2005 +0000
+++ b/lisp/ebuff-menu.el	Mon Jan 10 11:54:08 2005 +0000
@@ -149,7 +149,9 @@
 
 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")