(te-escape): Show `?' in prompt for help key.

0721fbe3 · Eli Zaretskii · 23f87bed · 0721fbe3 · 0721fbe3
Commit 0721fbe3 authored Sep 04, 2004 by Eli Zaretskii
Hide whitespace changes
Inline Side-by-side

Showing with 10 additions and 2 deletions

lisp/ChangeLog lisp/ChangeLog +4 -0

lisp/terminal.el lisp/terminal.el +6 -2

No files found.
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
+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.

--- 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))