# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 716386782 0
# Node ID eb7f1ab33a9dcca5b61dbca4b9a0b00cb956cffa
# Parent  903883eed4de10791d4d5c82efc841a5ebd706be
	* callint.c (Fcall_interactively): Remove the 'K' interactive
	code, in favor of 'e'; that's a better name.

	* callint.c (Fcall_interactively): Don't try to get the
	`enable-recursive-minibuffers' property from FUNCTION unless
	FUNCTION is actually a symbol; there are some cases where a key
	sequence is bound directly to a lambda form, and there's no reason
	to break these.

diff -r 903883eed4de -r eb7f1ab33a9d src/callint.c
--- a/src/callint.c	Sun Sep 13 12:14:54 1992 +0000
+++ b/src/callint.c	Sun Sep 13 12:19:42 1992 +0000
@@ -70,7 +70,6 @@
 f -- Existing file name.\n\
 F -- Possibly nonexistent file name.\n\
 k -- Key sequence (string).\n\
-K -- Mouse click that invoked this command (value of `last-nonmenu-event').\n\
 m -- Value of mark as number.  Does not do I/O.\n\
 n -- Number read using minibuffer.\n\
 N -- Prefix arg converted to number, or if none, do like code `n'.\n\
@@ -183,7 +182,8 @@
 
  retry:
 
-  enable = Fget (function, Qenable_recursive_minibuffers);
+  if (XTYPE (function) == Lisp_Symbol)
+    enable = Fget (function, Qenable_recursive_minibuffers);
 
   fun = indirect_function (function);
 
@@ -390,9 +390,8 @@
 	  visargs[i] = Fkey_description (teml);
 	  break;
 
-	case 'K':		/* Mouse click.  */
-	case 'e':		/* New, better name.  */
-	  args[i] = last_nonmenu_event;
+	case 'e':		/* Mouse click.  */
+	  args[i] = last_command_char;
 	  if (NILP (Fmouse_click_p (args[i])))
 	    error ("%s must be bound to a mouse click.",
 		   (XTYPE (function) == Lisp_Symbol