1 files changed, 2 insertions, 0 deletions

diff --git a/lisp/calc/calc-prog.el b/lisp/calc/calc-prog.el
index b4901b5f8a0..33d183b5c8c 100644
--- a/lisp/calc/calc-prog.el
+++ b/lisp/calc/calc-prog.el
@@ -1124,6 +1124,8 @@ Redefine the corresponding command."
   (calc-execute-kbd-macro last-kbd-macro arg))
 
 (defun calc-execute-kbd-macro (mac arg &rest prefix)
+  (if calc-keep-args-flag
+      (calc-keep-args))
   (if (and (vectorp mac) (> (length mac) 0) (stringp (aref mac 0)))
       (setq mac (or (aref mac 1)
                     (aset mac 1 (progn (and (fboundp 'edit-kbd-macro)