diff options
author | Jay Belanger <jay.p.belanger@gmail.com> | 2005-10-17 20:51:34 +0000 |
---|---|---|
committer | Jay Belanger <jay.p.belanger@gmail.com> | 2005-10-17 20:51:34 +0000 |
commit | 970dd0126861eff22714b2e9e891721087428cfa (patch) | |
tree | 467882570fb04dc7a2fc9c2b3f53b0d2da3d3042 /lisp/calc | |
parent | 9036e92f79c8d9107f8c811f50cc10b3db1a1967 (diff) | |
download | emacs-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.el | 2 |
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) |