diff options
| author | Jay Belanger <[email protected]> | 2004-12-30 17:43:09 +0000 |
|---|---|---|
| committer | Jay Belanger <[email protected]> | 2004-12-30 17:43:09 +0000 |
| commit | 922e9c189f753d8b4e263da01aa1659f6a37711c (patch) | |
| tree | ebafc0ecb9a153006d485a6a1b64f83ca08759a9 | |
| parent | c243063e8eb7c0f2aa4186da113ef0e677072a5e (diff) | |
(calc-copy-variable): Fix mistyped variable name. Display variable
name differently in message.
| -rw-r--r-- | lisp/calc/calc-store.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/calc/calc-store.el b/lisp/calc/calc-store.el index a3c401e734..9323952180 100644 --- a/lisp/calc/calc-store.el +++ b/lisp/calc/calc-store.el @@ -373,9 +373,10 @@ (if var1 (let ((value (calc-var-value var1))) (or value - (error "No such variable: \"%s\"" (calc-var-name var))) + (error "No such variable: \"%s\"" (calc-var-name var1))) (or var2 (setq var2 (calc-read-var-name - (format "Copy variable: %s, to: " var1)))) + (format "Copy variable: %s, to: " + (calc-var-name var1))))) (if var2 (calc-store-value var2 value "")))))) |