From 0721fbe3c2761509b246980d2000275e8582fb6c Mon Sep 17 00:00:00 2001
From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 4 Sep 2004 13:17:34 +0000
Subject: [PATCH] (te-escape): Show `?' in prompt for help key.

---
 lisp/ChangeLog   | 4 ++++
 lisp/terminal.el | 8 ++++++--
 2 files changed, 10 insertions(+), 2 deletions(-)

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dd83a9524e2..85f2ae468de 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2004-09-04  Jari Aalto  <jari.aalto@poboxes.com>
+
+	* terminal.el (te-escape): Show `?' in prompt for help key.
+
 2004-09-04  Emilio C. Lopes <eclig@gmx.net>
 
 	* emacs-lisp/lisp.el (kill-backward-up-list): New function.
diff --git a/lisp/terminal.el b/lisp/terminal.el
index 64c58d7743d..d33ba914cd3 100644
--- a/lisp/terminal.el
+++ b/lisp/terminal.el
@@ -209,9 +209,13 @@ performance."
           (use-local-map terminal-escape-map)
           (setq s (read-key-sequence
                     (if current-prefix-arg
-                        (format "Emacs Terminal escape> %d "
+                        (format "Emacs Terminal escape[%s for help]> %d "
+				(substitute-command-keys
+				 "\\<terminal-escape-map>\\[te-escape-help]")
                                 (prefix-numeric-value current-prefix-arg))
-                        "Emacs Terminal escape> "))))
+                        (format "Emacs Terminal escape[%s for help]> "
+				(substitute-command-keys
+				 "\\<terminal-escape-map>\\[te-escape-help]"))))))
       (use-global-map global)
       (use-local-map local))
 
-- 
2.39.2