mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 04:10:54 -08:00
Code Issues Projects Releases Wiki Activity

(apropos-print): Omit command from M-x ... RET.

Browse source
This commit is contained in:
Kim F. Storm 2005-03-07 11:00:25 +00:00
parent 2f8cd1ced0
commit eccfba6ef1
1 changed files with 6 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lisp/apropos.el
View file

@ -860,13 +860,12 @@ If non-nil TEXT is a string that will be printed as a heading."
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)