[Emacs-diffs] Changes to emacs/lisp/calc/calc-store.el

[Jay Belanger]

Index: emacs/lisp/calc/calc-store.el
diff -c emacs/lisp/calc/calc-store.el:1.12 emacs/lisp/calc/calc-store.el:1.13
*** emacs/lisp/calc/calc-store.el:1.12  Sun Jan  2 06:48:58 2005
--- emacs/lisp/calc/calc-store.el       Mon Jan 24 18:21:34 2005
***************
*** 482,488 ****
                             (setq rp nil)))
                       (not rp)))))
       (calc-unread-command ?\C-a)
!      (setq decl (read-string (format "Declare: %s  to be: " var)
                             (and rp
                                  (math-format-flat-expr (nth 2 (car dp)) 0))))
       (setq decl (and (string-match "[^ \t]" decl)
--- 482,488 ----
                             (setq rp nil)))
                       (not rp)))))
       (calc-unread-command ?\C-a)
!      (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)