diff options
| -rw-r--r-- | lisp/buff-menu.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el index c7bb7009241..696b7245d16 100644 --- a/lisp/buff-menu.el +++ b/lisp/buff-menu.el | |||
| @@ -373,7 +373,9 @@ in the selected frame." | |||
| 373 | (others ()) | 373 | (others ()) |
| 374 | tem) | 374 | tem) |
| 375 | (goto-char (point-min)) | 375 | (goto-char (point-min)) |
| 376 | (while (search-forward "\n>" nil t) | 376 | (unless Buffer-menu-use-header-line |
| 377 | (forward-line 1)) | ||
| 378 | (while (re-search-forward "^>" nil t) | ||
| 377 | (setq tem (Buffer-menu-buffer t)) | 379 | (setq tem (Buffer-menu-buffer t)) |
| 378 | (let ((buffer-read-only nil)) | 380 | (let ((buffer-read-only nil)) |
| 379 | (delete-char -1) | 381 | (delete-char -1) |