(comint-mode-map): Bind `C-c C-s' to comint-write-output.

diff --git a/lisp/comint.el b/lisp/comint.el
index 2569ce434d935b94cb40749460a89c31a1dd923e..382b15f4a742a64aaa0814a861ae77eb505aa563 100644 (file)
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -555,6 +555,7 @@ Entry to this mode runs the hooks on `comint-mode-hook'."
   (define-key comint-mode-map "\C-c\C-n" 'comint-next-prompt)
   (define-key comint-mode-map "\C-c\C-p" 'comint-previous-prompt)
   (define-key comint-mode-map "\C-c\C-d" 'comint-send-eof)
+  (define-key comint-mode-map "\C-c\C-s" 'comint-write-output)
   ;; Mouse Buttons:
   (define-key comint-mode-map [mouse-2] 'comint-insert-clicked-input)
   ;; Menu bars: