From: Jay Belanger <jay.p.belanger@gmail.com>
Date: Tue, 15 Feb 2005 19:26:49 +0000 (+0000)
Subject: (calc-handle-undo): Remove prefix from variable in message.
X-Git-Tag: ttn-vms-21-2-B4~2271
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6735a29b343972d958c9c03a2b29e56aa1a69bd8;p=emacs.git

(calc-handle-undo): Remove prefix from variable in message.
---

diff --git a/lisp/calc/calc-undo.el b/lisp/calc/calc-undo.el
index a49c34010ab..d946a1390d3 100644
--- a/lisp/calc/calc-undo.el
+++ b/lisp/calc/calc-undo.el
@@ -77,7 +77,8 @@
 	   (let ((v (intern (nth 1 action))))
 	     (calc-record-undo (list 'store (nth 1 action)
 				     (and (boundp v) (symbol-value v))))
-	     (if (y-or-n-p (format "Un-store variable %s? " (nth 1 action)))
+	     (if (y-or-n-p (format "Un-store variable %s? " 
+                                   (calc-var-name (nth 1 action))))
 		 (progn
 		   (if (nth 2 action)
 		       (set v (nth 2 action))