changeset 59720:be3370bd02da

(calc-declare-variable): Use calc-var-name to display variable name.
author Jay Belanger <jay.p.belanger@gmail.com>
date Mon, 24 Jan 2005 18:21:34 +0000
parents b1adddb0ff32
children 0db7d5d8574b
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 Jan 24 18:00:43 2005 +0000
+++ b/lisp/calc/calc-store.el	Mon Jan 24 18:21:34 2005 +0000
@@ -482,7 +482,7 @@
 			     (setq rp nil)))
 		       (not rp)))))
      (calc-unread-command ?\C-a)
-     (setq decl (read-string (format "Declare: %s  to be: " var)
+     (setq decl (read-string (format "Declare: %s  to be: " (calc-var-name var))
 			     (and rp
 				  (math-format-flat-expr (nth 2 (car dp)) 0))))
      (setq decl (and (string-match "[^ \t]" decl)