* lisp/term.el (term-set-escape-char): Make it idempotent.
This commit is contained in:
parent
f79362a7a0
commit
8582e4c4b9
2 changed files with 5 additions and 1 deletions
|
@ -1,3 +1,7 @@
|
|||
2013-05-11 Glenn Morris <rgm@gnu.org>
|
||||
|
||||
* term.el (term-set-escape-char): Make it idempotent.
|
||||
|
||||
2013-05-10 Leo Liu <sdl.web@gmail.com>
|
||||
|
||||
* progmodes/octave.el (inferior-octave-completion-table): No
|
||||
|
|
|
@ -953,7 +953,7 @@ is buffer-local."
|
|||
(when term-escape-char
|
||||
;; Undo previous term-set-escape-char.
|
||||
(define-key term-raw-map term-escape-char 'term-send-raw))
|
||||
(setq term-escape-char (vector key))
|
||||
(setq term-escape-char (if (vectorp key) key (vector key)))
|
||||
(define-key term-raw-map term-escape-char term-raw-escape-map)
|
||||
;; FIXME: If we later call term-set-escape-char again with another key,
|
||||
;; we should undo this binding.
|
||||
|
|
Loading…
Add table
Reference in a new issue