mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-02-01 20:06:00 +00:00
(te-escape): Show `?' in prompt for help key.
This commit is contained in:
parent
23f87bede0
commit
0721fbe3c2
@ -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.
|
||||
|
@ -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))
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user