diff options
| author | Chong Yidong <cyd@gnu.org> | 2012-05-07 13:37:38 +0800 |
|---|---|---|
| committer | Chong Yidong <cyd@gnu.org> | 2012-05-07 13:37:38 +0800 |
| commit | 1241b724c80c73731c7e5710a98886b745a211a8 (patch) | |
| tree | 182503d2846c9d3c134db2ca502997844081b4f4 /lisp/buff-menu.el | |
| parent | e5f9458fe818fd87ec99354420c3633ca928d62c (diff) | |
| download | emacs-1241b724c80c73731c7e5710a98886b745a211a8.tar.gz | |
Restore Buffer-menu-use-header-line functionality.
* lisp/emacs-lisp/tabulated-list.el: Add no-header-line alternative.
(tabulated-list-use-header-line): New var.
(tabulated-list-init-header): Use it.
(tabulated-list-print-fake-header): New function.
(tabulated-list-print): Use it.
(tabulated-list-sort-button-map): Add non-header-line commands.
(tabulated-list-init-header): Add column name property to basic
labels as well.
(tabulated-list-col-sort): Handle non-header-line button case.
(tabulated-list--sort-by-column-name): Fix a corner case.
* lisp/buff-menu.el (list-buffers--refresh): Handle
Buffer-menu-use-header-line.
Diffstat (limited to 'lisp/buff-menu.el')
| -rw-r--r-- | lisp/buff-menu.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/buff-menu.el b/lisp/buff-menu.el index e28c2c0f60b..4ea9dcea8b4 100644 --- a/lisp/buff-menu.el +++ b/lisp/buff-menu.el @@ -574,6 +574,7 @@ means list those buffers and no others." `("Size" ,size-width tabulated-list-entry-size->) `("Mode" ,Buffer-menu-mode-width t) '("File" 1 t)))) + (setq tabulated-list-use-header-line Buffer-menu-use-header-line) ;; Collect info for each buffer we're interested in. (let ((buffer-menu-buffer (current-buffer)) (show-non-file (not Buffer-menu-files-only)) |