changeset 66157:9b54a8bf0ecf

(calc-store-into): Get proper variable name to display in message.
author Jay Belanger <jay.p.belanger@gmail.com>
date Mon, 17 Oct 2005 20:51:34 +0000
parents b6a209407cf3
children fc30d97ea62e
files lisp/calc/calc-store.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc-store.el	Mon Oct 17 17:39:57 2005 +0000
+++ b/lisp/calc/calc-store.el	Mon Oct 17 20:51:34 2005 +0000
@@ -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)