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)