Index: emacs/lisp/calc/calc-prog.el
diff -c emacs/lisp/calc/calc-prog.el:1.29 emacs/lisp/calc/calc-prog.el:1.30
*** emacs/lisp/calc/calc-prog.el:1.29   Fri May 27 14:25:16 2005
--- emacs/lisp/calc/calc-prog.el        Fri May 27 14:31:10 2005
***************
*** 1457,1463 ****
          (executing-kbd-macro nil)
          (msg (calc-top 1)))
      (if (not (eq (car-safe msg) 'vec))
!         (error "No prompt string provided on stack")
        (setq msg (math-vector-to-string msg))
        (calc-wrapper
         (calc-pop-stack 1)
--- 1457,1463 ----
          (executing-kbd-macro nil)
          (msg (calc-top 1)))
      (if (not (eq (car-safe msg) 'vec))
!         (error "No prompt string provided")
        (setq msg (math-vector-to-string msg))
        (calc-wrapper
         (calc-pop-stack 1)


_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs

Reply via email to