Variable: comint-mode-map

comint-mode-map is a variable defined in comint.el.gz.

Value

<delete>     delete-forward-char
<kp-delete>  delete-forward-char
<mouse-2>    comint-insert-input
C-<down>     comint-next-input
C-<up>       comint-previous-input
C-M-l        comint-show-output
C-c .        comint-insert-previous-argument
C-c C-\      comint-quit-subjob
C-c C-a      comint-bol-or-process-mark
C-c C-c      comint-interrupt-subjob
C-c C-d      comint-send-eof
C-c C-e      comint-show-maximum-output
C-c C-l      comint-dynamic-list-input-ring
C-c C-n      comint-next-prompt
C-c C-o      comint-delete-output
C-c C-p      comint-previous-prompt
C-c C-r      comint-show-output
C-c C-s      comint-write-output
C-c C-u      comint-kill-input
C-c C-w      backward-kill-word
C-c C-x      comint-get-next-from-history
C-c C-z      comint-stop-subjob
C-c M-o      comint-clear-buffer
C-c M-r      comint-previous-matching-input-from-input
C-c M-s      comint-next-matching-input-from-input
C-c RET      comint-copy-old-input
C-c SPC      comint-accumulate
C-d          comint-delchar-or-maybe-eof
C-x <up>     comint-complete-input-ring
M-n          comint-next-input
M-p          comint-previous-input
M-r          comint-history-isearch-backward-regexp
RET          comint-send-input

Documentation

Keymap for comint-mode.

Source Code

;; Defined in /usr/src/emacs/lisp/comint.el.gz
(defvar comint-mode-map
  (let ((map (make-sparse-keymap)))
    ;; Keys:
    (define-key map "\ep"         #'comint-previous-input)
    (define-key map "\en"         #'comint-next-input)
    (define-key map [C-up]        #'comint-previous-input)
    (define-key map [C-down]      #'comint-next-input)
    (define-key map "\er"         #'comint-history-isearch-backward-regexp)
    (define-key map [?\C-c ?\M-r] #'comint-previous-matching-input-from-input)
    (define-key map [?\C-c ?\M-s] #'comint-next-matching-input-from-input)
    (define-key map [?\C-x up]    #'comint-complete-input-ring)
    (define-key map "\e\C-l"      #'comint-show-output)
    (define-key map "\C-m"        #'comint-send-input)
    (define-key map "\C-d"        #'comint-delchar-or-maybe-eof)
    ;; The following two are standardly bound to delete-forward-char,
    ;; but they should never do EOF, just delete.
    (define-key map [delete]      #'delete-forward-char)
    (define-key map [kp-delete]	  #'delete-forward-char)
    (define-key map "\C-c "       #'comint-accumulate)
    (define-key map "\C-c\C-x"    #'comint-get-next-from-history)
    (define-key map "\C-c\C-a"    #'comint-bol-or-process-mark)
    (define-key map "\C-c\C-u"    #'comint-kill-input)
    (define-key map "\C-c\C-w"    #'backward-kill-word)
    (define-key map "\C-c\C-c"    #'comint-interrupt-subjob)
    (define-key map "\C-c\C-z"    #'comint-stop-subjob)
    (define-key map "\C-c\C-\\"   #'comint-quit-subjob)
    (define-key map "\C-c\C-m"    #'comint-copy-old-input)
    (define-key map "\C-c\C-o"    #'comint-delete-output)
    (define-key map "\C-c\M-o"    #'comint-clear-buffer)
    (define-key map "\C-c\C-r"    #'comint-show-output)
    (define-key map "\C-c\C-e"    #'comint-show-maximum-output)
    (define-key map "\C-c\C-l"    #'comint-dynamic-list-input-ring)
    (define-key map "\C-c\C-n"    #'comint-next-prompt)
    (define-key map "\C-c\C-p"    #'comint-previous-prompt)
    (define-key map "\C-c\C-d"    #'comint-send-eof)
    (define-key map "\C-c\C-s"    #'comint-write-output)
    (define-key map "\C-c."       #'comint-insert-previous-argument)
    ;; Mouse Buttons:
    (define-key map [mouse-2]     #'comint-insert-input)
    ;; Menu bars:
    ;; completion:
    (define-key map [menu-bar completion]
      (cons "Complete" (make-sparse-keymap "Complete")))
    (define-key map [menu-bar completion complete-expand]
      '("Expand File Name" . comint-replace-by-expanded-filename))
    (define-key map [menu-bar completion complete-listing]
      '("File Completion Listing" . comint-dynamic-list-filename-completions))
    (define-key map [menu-bar completion complete-file]
      '("Complete File Name" . comint-dynamic-complete-filename))
    (define-key map [menu-bar completion complete]
      '("Complete at Point" . completion-at-point))
    ;; Input history:
    (define-key map [menu-bar inout]
      (cons "In/Out" (make-sparse-keymap "In/Out")))
    (define-key map [menu-bar inout delete-output]
      '("Delete Current Output Group" . comint-delete-output))
    (define-key map [menu-bar inout append-output-to-file]
      '("Append Current Output Group to File" . comint-append-output-to-file))
    (define-key map [menu-bar inout write-output]
      '("Write Current Output Group to File" . comint-write-output))
    (define-key map [menu-bar inout next-prompt]
      '("Forward Output Group" . comint-next-prompt))
    (define-key map [menu-bar inout previous-prompt]
      '("Backward Output Group" . comint-previous-prompt))
    (define-key map [menu-bar inout show-maximum-output]
      '("Show Maximum Output" . comint-show-maximum-output))
    (define-key map [menu-bar inout show-output]
      '("Show Current Output Group" . comint-show-output))
    (define-key map [menu-bar inout kill-input]
      '("Kill Current Input" . comint-kill-input))
    (define-key map [menu-bar inout copy-input]
      '("Copy Old Input" . comint-copy-old-input))
    (define-key map [menu-bar inout history-isearch-backward-regexp]
      '("Isearch Input Regexp Backward..." . comint-history-isearch-backward-regexp))
    (define-key map [menu-bar inout history-isearch-backward]
      '("Isearch Input String Backward..." . comint-history-isearch-backward))
    (define-key map [menu-bar inout forward-matching-history]
      '("Forward Matching Input..." . comint-forward-matching-input))
    (define-key map [menu-bar inout backward-matching-history]
      '("Backward Matching Input..." . comint-backward-matching-input))
    (define-key map [menu-bar inout next-matching-history]
      '("Next Matching Input..." . comint-next-matching-input))
    (define-key map [menu-bar inout previous-matching-history]
      '("Previous Matching Input..." . comint-previous-matching-input))
    (define-key map [menu-bar inout next-matching-history-from-input]
      '("Next Matching Current Input" . comint-next-matching-input-from-input))
    (define-key map [menu-bar inout previous-matching-history-from-input]
      '("Previous Matching Current Input" . comint-previous-matching-input-from-input))
    (define-key map [menu-bar inout next-history]
      '("Next Input" . comint-next-input))
    (define-key map [menu-bar inout previous-history]
      '("Previous Input" . comint-previous-input))
    (define-key map [menu-bar inout list-history]
      '("List Input History" . comint-dynamic-list-input-ring))
    (define-key map [menu-bar inout expand-history]
      '("Expand History Before Point" . comint-replace-by-expanded-history))
    ;; Signals
    (let ((signals-map (make-sparse-keymap "Signals")))
      (define-key map [menu-bar signals] (cons "Signals" signals-map))
      (define-key signals-map [eof]   '("EOF"   . comint-send-eof))
      (define-key signals-map [kill]  '("KILL"  . comint-kill-subjob))
      (define-key signals-map [quit]  '("QUIT"  . comint-quit-subjob))
      (define-key signals-map [cont]  '("CONT"  . comint-continue-subjob))
      (define-key signals-map [stop]  '("STOP"  . comint-stop-subjob))
      (define-key signals-map [break] '("BREAK" . comint-interrupt-subjob)))
    ;; Put them in the menu bar:
    (setq menu-bar-final-items (append '(completion inout signals)
				       menu-bar-final-items))
    map))