From: Richard M. Stallman Date: Fri, 7 Aug 1998 07:15:37 +0000 (+0000) Subject: (Fcall_interactively): Pass new arg to Fread_key_sequence. X-Git-Tag: emacs-20.3~147 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ad4ac475214d945898ff36f7c147b44e1a748c11;p=emacs.git (Fcall_interactively): Pass new arg to Fread_key_sequence. --- diff --git a/src/callint.c b/src/callint.c index eb60907d7f6..c3591c8acb6 100644 --- a/src/callint.c +++ b/src/callint.c @@ -549,7 +549,7 @@ Otherwise, this is done only if an arg is read using the minibuffer.") int speccount1 = specpdl_ptr - specpdl; specbind (Qcursor_in_echo_area, Qt); args[i] = Fread_key_sequence (build_string (callint_message), - Qnil, Qnil, Qnil); + Qnil, Qnil, Qnil, Qnil); unbind_to (speccount1, Qnil); teml = args[i]; visargs[i] = Fkey_description (teml); @@ -576,7 +576,7 @@ Otherwise, this is done only if an arg is read using the minibuffer.") int speccount1 = specpdl_ptr - specpdl; specbind (Qcursor_in_echo_area, Qt); args[i] = Fread_key_sequence (build_string (callint_message), - Qnil, Qt, Qnil); + Qnil, Qt, Qnil, Qnil); teml = args[i]; visargs[i] = Fkey_description (teml); unbind_to (speccount1, Qnil);