mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Use defvar-keymap in eshell

Browse source 
* lisp/eshell/em-cmpl.el (eshell-cmpl-mode-map):
* lisp/eshell/em-hist.el (eshell-isearch-map, eshell-hist-mode-map):
* lisp/eshell/em-pred.el (eshell-pred-mode-map):
* lisp/eshell/em-prompt.el (eshell-prompt-mode-map):
* lisp/eshell/em-rebind.el (eshell-rebind-mode-map):
* lisp/eshell/esh-arg.el (eshell-arg-mode-map):
* lisp/eshell/esh-mode.el (eshell-mode-map, eshell-command-map):
* lisp/eshell/esh-proc.el (eshell-proc-mode-map):
* lisp/eshell/esh-var.el (eshell-var-mode-map): Use defvar-keymap.
This commit is contained in:
Stefan Kangas 2021-12-23 19:03:53 +01:00
parent 1668a9b91e
commit 31d34e43e5
9 changed files with 72 additions and 92 deletions
Download patch file Download diff file Expand all files Collapse all files

16
lisp/eshell/esh-proc.el
View file

@ -101,15 +101,13 @@ information, for example."
(defvar eshell-process-list nil
"A list of the current status of subprocesses.")
(defvar eshell-proc-mode-map
(let ((map (make-sparse-keymap)))
(define-key map (kbd "C-c M-i") #'eshell-insert-process)
(define-key map (kbd "C-c C-c") #'eshell-interrupt-process)
(define-key map (kbd "C-c C-k") #'eshell-kill-process)
(define-key map (kbd "C-c C-d") #'eshell-send-eof-to-process)
(define-key map (kbd "C-c C-s") #'list-processes)
(define-key map (kbd "C-c C-\\") #'eshell-quit-process)
map))
(defvar-keymap eshell-proc-mode-map
"C-c M-i" #'eshell-insert-process
"C-c C-c" #'eshell-interrupt-process
"C-c C-k" #'eshell-kill-process
"C-c C-d" #'eshell-send-eof-to-process
"C-c C-s" #'list-processes
"C-c C-\\" #'eshell-quit-process)
;;; Functions: