# HG changeset patch
# User Jay Belanger <jay.p.belanger@gmail.com>
# Date 1102022241 0
# Node ID 58d50d1b56ac78fa13b9f552a9e7666c74c29a83
# Parent  13bd6594265810de20f7a2884a5d5781f0695d34
(calc-read-key-sequence): Leave message visible.

diff -r 13bd65942658 -r 58d50d1b56ac lisp/calc/calc.el
--- a/lisp/calc/calc.el	Thu Dec 02 10:56:05 2004 +0000
+++ b/lisp/calc/calc.el	Thu Dec 02 21:17:21 2004 +0000
@@ -967,9 +967,7 @@
 	  (progn
 	    (use-global-map map)
 	    (use-local-map nil)
-	    (read-key-sequence
-	     (if (commandp (key-binding (vector (cdr key))))
-		 "" prompt2)))
+	    (read-key-sequence nil))
 	(use-global-map glob)
 	(use-local-map loc)))))