]> git.eshelyaron.com Git - emacs.git/commitdiff
(Fexecute_extended_command): Fix message wording.
authorKarl Heuer <kwzh@gnu.org>
Mon, 17 Nov 1997 02:15:35 +0000 (02:15 +0000)
committerKarl Heuer <kwzh@gnu.org>
Mon, 17 Nov 1997 02:15:35 +0000 (02:15 +0000)
Don't print a message for a binding for mouse-movement.

src/keyboard.c

index bf5643dba06708fd6b5fe160d87e89ea261787a0..7264ca599b9aa3ef7c6af53888a839614e29d010 100644 (file)
@@ -7251,7 +7251,8 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_
   value = Fcommand_execute (function, Qt, Qnil, Qnil);
 
   /* If the command has a key binding, print it now.  */
-  if (!NILP (bindings))
+  if (!NILP (bindings)
+      && ! (ARRAYP (bindings) && EQ (Faref (bindings), Qmouse_movement)))
     {
       /* But first wait, and skip the message if there is input.  */
       if (!NILP (Fsit_for ((NUMBERP (Vsuggest_key_bindings)
@@ -7270,7 +7271,7 @@ DEFUN ("execute-extended-command", Fexecute_extended_command, Sexecute_extended_
            = (char *) alloca (XSYMBOL (function)->name->size
                               + XSTRING (binding)->size
                               + 100);
-         sprintf (newmessage, "You can run the command `%s' by typing %s",
+         sprintf (newmessage, "You can run the command `%s' with %s",
                   XSYMBOL (function)->name->data,
                   XSTRING (binding)->data);
          message1_nolog (newmessage);