1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-22 07:09:54 +00:00

(Buffer-menu-buffer): Clear text properties in STRING.

This commit is contained in:
Richard M. Stallman 1994-12-20 23:05:23 +00:00
parent f16c38ae77
commit f90f28a039

View File

@ -139,6 +139,7 @@ Letters do not insert themselves; instead, they are commands.
"Return buffer described by this line of buffer menu."
(let* ((where (Buffer-menu-buffer-name-position))
(string (buffer-substring (car where) (cdr where))))
(set-text-properties 0 (length string) nil string)
(or (get-buffer string)
(if error-if-non-existent-p
(error "No buffer named \"%s\"" string)