changeset 59631:5f8090982771

(calc-execute-kbd-macro): Ignore calc-keep-arg-flag.
author Jay Belanger <jay.p.belanger@gmail.com>
date Wed, 19 Jan 2005 05:12:36 +0000
parents e35417abe6a6
children 0f52526e17cb
files lisp/calc/calc-prog.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc-prog.el	Wed Jan 19 00:08:30 2005 +0000
+++ b/lisp/calc/calc-prog.el	Wed Jan 19 05:12:36 2005 +0000
@@ -1124,6 +1124,8 @@
   (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)