* lisp/term.el: Make C-/ undo in a nested Emacs subprocess

(term-send-C-_): New function.
(term-raw-map): Use it for `C-/`, as is done in xterm and friends.
This commit is contained in:
Stefan Monnier 2020-09-30 19:17:26 -04:00
parent 8f6bde6371
commit fdaceeb8b4

View file

@ -860,6 +860,7 @@ is buffer-local."
(define-key map [prior] 'term-send-prior)
(define-key map [next] 'term-send-next)
(define-key map [xterm-paste] #'term--xterm-paste)
(define-key map [?\C-/] #'term-send-C-_)
map)
"Keyboard map for sending characters directly to the inferior process.")
@ -1282,6 +1283,7 @@ without any interpretation."
(defun term-send-next () (interactive) (term-send-raw-string "\e[6~"))
(defun term-send-del () (interactive) (term-send-raw-string "\e[3~"))
(defun term-send-backspace () (interactive) (term-send-raw-string "\C-?"))
(defun term-send-C-_ () (interactive) (term-send-raw-string "\C-_"))
(defun term-char-mode ()
"Switch to char (\"raw\") sub-mode of term mode.