[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/calc/calc-store.el
From: |
Jay Belanger |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/calc/calc-store.el |
Date: |
Thu, 30 Dec 2004 12:57:22 -0500 |
Index: emacs/lisp/calc/calc-store.el
diff -c emacs/lisp/calc/calc-store.el:1.9 emacs/lisp/calc/calc-store.el:1.10
*** emacs/lisp/calc/calc-store.el:1.9 Mon Dec 27 05:02:08 2004
--- emacs/lisp/calc/calc-store.el Thu Dec 30 17:43:09 2004
***************
*** 373,381 ****
(if var1
(let ((value (calc-var-value var1)))
(or value
! (error "No such variable: \"%s\"" (calc-var-name var)))
(or var2 (setq var2 (calc-read-var-name
! (format "Copy variable: %s, to: " var1))))
(if var2
(calc-store-value var2 value ""))))))
--- 373,382 ----
(if var1
(let ((value (calc-var-value var1)))
(or value
! (error "No such variable: \"%s\"" (calc-var-name var1)))
(or var2 (setq var2 (calc-read-var-name
! (format "Copy variable: %s, to: "
! (calc-var-name var1)))))
(if var2
(calc-store-value var2 value ""))))))