summaryrefslogtreecommitdiff
path: root/lisp/calc
diff options
context:
space:
mode:
authorJay Belanger <jay.p.belanger@gmail.com>2005-10-17 20:51:34 +0000
committerJay Belanger <jay.p.belanger@gmail.com>2005-10-17 20:51:34 +0000
commit970dd0126861eff22714b2e9e891721087428cfa (patch)
tree467882570fb04dc7a2fc9c2b3f53b0d2da3d3042 /lisp/calc
parent9036e92f79c8d9107f8c811f50cc10b3db1a1967 (diff)
downloademacs-970dd0126861eff22714b2e9e891721087428cfa.tar.gz
(calc-store-into): Get proper variable name to display in message.
Diffstat (limited to 'lisp/calc')
-rw-r--r--lisp/calc/calc-store.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-store.el b/lisp/calc/calc-store.el
index 82c7077ba91..d6a37644cc7 100644
--- a/lisp/calc/calc-store.el
+++ b/lisp/calc/calc-store.el
@@ -71,7 +71,7 @@
(if (not (cdr var)) "")
(if (not (cdr var)) 1))))
(message (concat "Stored to variable \"%s\"" msg)
- (calc-var-name var)))
+ (calc-var-name (car (car var)))))
(setq var (cdr var))))))))
(defun calc-store-plus (&optional var)