Function: comint-redirect-cleanup

comint-redirect-cleanup is an interactive and byte-compiled function defined in comint.el.gz.

Signature

(comint-redirect-cleanup)

Documentation

End a Comint redirection. See comint-redirect-send-command.

Key Bindings

Aliases

comint-redirect-remove-redirection

Source Code

;; Defined in /usr/src/emacs/lisp/comint.el.gz
(defun comint-redirect-cleanup ()
  "End a Comint redirection.  See `comint-redirect-send-command'."
  (interactive nil comint-mode)
  ;; Release the last redirected string
  (setq comint-redirect-previous-input-string nil)
  ;; Restore the process filter
  (remove-function (process-filter (get-buffer-process (current-buffer)))
                   #'comint-redirect-filter)
  ;; Restore the mode line
  (setq mode-line-process comint-redirect-original-mode-line-process)
  ;; Set the completed flag
  (setq comint-redirect-completed t))