(calc-fancy-prefix-other-key): Set prefix arg.

diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el
index 059dab357670836a78bb01c5edf6e55d1a4b96ec..8d3be3b8505923899c1749d478a8f2f868606860 100644 (file)
--- a/lisp/calc/calc-ext.el
+++ b/lisp/calc/calc-ext.el
@@ -1401,6 +1401,7 @@ calc-kill calc-kill-region calc-yank))))
            (and (>= last-command-char 0) (< last-command-char ? )
                 (not (eq last-command-char meta-prefix-char)))))
      (calc-wrapper))  ; clear flags if not a Calc command.
+  (setq prefix-arg arg)
   (calc-unread-command)
   (setq overriding-terminal-local-map nil))