# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1013803165 0
# Node ID 63607f9209a0ec7888c32a8d80a2fcb54404dcd5
# Parent  e04cbee893bc36657e95fd2e03773a1f41f39355
(describe-key-briefly): Make output in INSERT case
look just like what is displayed in the normal case.

diff -r e04cbee893bc -r 63607f9209a0 lisp/help.el
--- a/lisp/help.el	Fri Feb 15 17:06:58 2002 +0000
+++ b/lisp/help.el	Fri Feb 15 19:59:25 2002 +0000
@@ -477,11 +477,9 @@
 	    (key-desc (key-description key)))
 	(if (or (null defn) (integerp defn))
 	    (princ (format "%s is undefined" key-desc))
-	  (princ (format (if insert
-			     "`%s' (`%s')"
-			   (if (windowp window)
-			       "%s at that spot runs the command %s"
-			     "%s runs the command %s"))
+	  (princ (format (if (windowp window)
+			     "%s at that spot runs the command %s"
+			   "%s runs the command %s")
 			 key-desc
 			 (if (symbolp defn) defn (prin1-to-string defn)))))))))