Mercurial > emacs
changeset 60483:182ac86fdef1
(apropos-print): Omit command from M-x ... RET.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Mon, 07 Mar 2005 11:00:25 +0000 |
parents | 29c6b4b182a3 |
children | 187f3c8273cc |
files | lisp/apropos.el |
diffstat | 1 files changed, 6 insertions(+), 7 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/apropos.el Mon Mar 07 11:00:07 2005 +0000 +++ b/lisp/apropos.el Mon Mar 07 11:00:25 2005 +0000 @@ -860,13 +860,12 @@ key)) key) item ", ")) - (insert "M-x") - (put-text-property (- (point) 3) (point) - 'face apropos-keybinding-face) - (insert " " (symbol-name symbol) " ") - (insert "RET") - (put-text-property (- (point) 3) (point) - 'face apropos-keybinding-face))) + (insert "M-x ... RET") + (when apropos-keybinding-face + (put-text-property (- (point) 11) (- (point) 8) + 'face apropos-keybinding-face) + (put-text-property (- (point) 3) (point) + 'face apropos-keybinding-face)))) (terpri) (apropos-print-doc 2 (if (commandp symbol)