fix this-command variable for keypad execution

45mg · Feb 2, 2022 · 39fe100 · 39fe100
1 parent cdf5e30
commit 39fe100
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/meow-keypad.el b/meow-keypad.el
@@ -380,7 +380,8 @@ try replacing the last modifier and try again."
               (describe-function cmd))
           (let ((meow--keypad-this-command cmd))
             (meow--keypad-quit)
-            (setq real-this-command cmd)
+            (setq real-this-command cmd
+                  this-command cmd)
             (call-interactively cmd))))
        ((keymapp cmd)
         (when meow-keypad-message (meow--keypad-show-message))