diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/ebuff-menu.el | 3 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index b858b10c3e1..05a9c19bf04 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2012-06-09 Chong Yidong <cyd@gnu.org> + + * ebuff-menu.el (electric-buffer-list): Preserve header line. + 2012-06-09 Martin Rudalics <rudalics@gmx.at> * window.el (special-display-popup-frame): Don't use diff --git a/lisp/ebuff-menu.el b/lisp/ebuff-menu.el index e973f45bc44..f71554e9f66 100644 --- a/lisp/ebuff-menu.el +++ b/lisp/ebuff-menu.el @@ -121,9 +121,10 @@ Run hooks in `electric-buffer-menu-mode-hook' on entry. (setq buffer (list-buffers-noselect arg)) (Electric-pop-up-window buffer) (unwind-protect - (progn + (let ((header header-line-format)) (set-buffer buffer) (electric-buffer-menu-mode) + (setq header-line-format header) (goto-char (point-min)) (if (search-forward "\n." nil t) (forward-char -1)) |