Mercurial > emacs

changeset 15159:b22de331ee43

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(apropos-print): If command has no key bindings, say how to run it with M-x.
author Richard M. Stallman <rms@gnu.org>
date Sat, 04 May 1996 00:50:49 +0000
parents e8ceba484a94
children bc35b62c3798
files lisp/apropos.el
diffstat 1 files changed, 8 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/apropos.el	Fri May 03 21:48:07 1996 +0000
+++ b/lisp/apropos.el	Sat May 04 00:50:49 1996 +0000
@@ -493,7 +493,14 @@
 					      key))
 		       key)
 		     item ", "))
-		 (insert "(not bound to any keys)")))
+		 (insert "Type ")
+		 (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)))
 	  (terpri)
 	  ;; only now so we don't propagate text attributes all over
 	  (put-text-property point1 point2 'item