/[emacs]/emacs/lisp/calc/calc-prog.el
ViewVC logotype

Diff of /emacs/lisp/calc/calc-prog.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.29 by jpb, Fri May 27 14:25:16 2005 UTC revision 1.30 by jpb, Fri May 27 14:31:10 2005 UTC
# Line 1457  Redefine the corresponding command." Line 1457  Redefine the corresponding command."
1457          (executing-kbd-macro nil)          (executing-kbd-macro nil)
1458          (msg (calc-top 1)))          (msg (calc-top 1)))
1459      (if (not (eq (car-safe msg) 'vec))      (if (not (eq (car-safe msg) 'vec))
1460          (error "No prompt string provided on stack")          (error "No prompt string provided")
1461        (setq msg (math-vector-to-string msg))        (setq msg (math-vector-to-string msg))
1462        (calc-wrapper        (calc-wrapper
1463         (calc-pop-stack 1)         (calc-pop-stack 1)

Legend:
Removed from v.1.29  
changed lines
  Added in v.1.30

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26