Mercurial > emacs

diff lisp/apropos.el @ 60483:182ac86fdef1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(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 253d4187af2d
children 7c759dd7ab37 29e773288013
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)