Mercurial > emacs
changeset 15475:fc94c6fcee69
(mouse-buffer-menu): Use aref rather than string-match.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Fri, 21 Jun 1996 15:33:46 +0000 |
| parents | 0b4fc263d4f2 |
| children | 0236199fc5f1 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 1 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Fri Jun 21 15:31:50 1996 +0000 +++ b/lisp/mouse.el Fri Jun 21 15:33:46 1996 +0000 @@ -1197,8 +1197,7 @@ (setq tail (buffer-list)) (while tail (let ((elt (car tail))) - (if (not (string-match "^ " - (buffer-name elt))) + (if (/= (aref (buffer-name elt) 0) ?\ ) (setq head (cons (cons