diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2004-09-04 13:17:34 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2004-09-04 13:17:34 +0000 |
| commit | 0721fbe3c2761509b246980d2000275e8582fb6c (patch) | |
| tree | 6cf8748db3a9e04c13d01a2ac9563e9a2a79890f | |
| parent | 23f87bede063c31c164f97278caabdc5cf5e6980 (diff) | |
| download | emacs-0721fbe3c2761509b246980d2000275e8582fb6c.tar.gz | |
(te-escape): Show `?' in prompt for help key.
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | 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)) |