From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Tue, 15 Dec 2020 06:18:03 +0000 (+0100)
Subject: Bind current-minibuffer-command to this-command
X-Git-Tag: emacs-28.0.90~4698
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3806797583a22ad520e64f7fc35d893840f0d563;p=emacs.git

Bind current-minibuffer-command to this-command

* src/callint.c (Fcall_interactively): Bind
current-minibuffer-command to this-command, as documented (bug#45177).
---

diff --git a/src/callint.c b/src/callint.c
index a221705f676..d172af9e30b 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -286,7 +286,7 @@ invoke it (via an `interactive' spec that contains, for instance, an
   /* Bound recursively so that code can check the current command from
      code running from minibuffer hooks (and the like), without being
      overwritten by subsequent minibuffer calls.  */
-  specbind (Qcurrent_minibuffer_command, Vreal_this_command);
+  specbind (Qcurrent_minibuffer_command, Vthis_command);
 
   if (NILP (keys))
     keys = this_command_keys, key_count = this_command_key_count;