Mercurial > emacs
comparison lisp/buff-menu.el @ 67177:e59c64acce36
(list-buffers-noselect): Display the selected frame's buffer list, not
the global one.
| author | Károly Lőrentey <lorentey@elte.hu> |
|---|---|
| date | Mon, 28 Nov 2005 14:36:07 +0000 |
| parents | 82157c2afd44 |
| children | 8e9343dc7c39 |
comparison
equal
deleted
inserted
replaced
| 67176:c1b362058986 | 67177:e59c64acce36 |
|---|---|
| 720 (apply 'string | 720 (apply 'string |
| 721 (mapcar (lambda (c) | 721 (mapcar (lambda (c) |
| 722 (if (memq c '(?\n ?\s)) c underline)) | 722 (if (memq c '(?\n ?\s)) c underline)) |
| 723 header))))) | 723 header))))) |
| 724 ;; Collect info for every buffer we're interested in. | 724 ;; Collect info for every buffer we're interested in. |
| 725 (dolist (buffer (or buffer-list (buffer-list))) | 725 (dolist (buffer (or buffer-list (buffer-list (selected-frame)))) |
| 726 (with-current-buffer buffer | 726 (with-current-buffer buffer |
| 727 (let ((name (buffer-name)) | 727 (let ((name (buffer-name)) |
| 728 (file buffer-file-name)) | 728 (file buffer-file-name)) |
| 729 (unless (and (not buffer-list) | 729 (unless (and (not buffer-list) |
| 730 (or | 730 (or |