Function: te-filter

te-filter is a byte-compiled function defined in terminal.el.gz.

Signature

(te-filter PROCESS STRING)

Source Code

;; Defined in /usr/src/emacs/lisp/obsolete/terminal.el.gz
(defun te-filter (process string)
  (with-current-buffer (process-buffer process)
    (goto-char te-saved-point)
    (and (bufferp te-log-buffer)
         (if (null (buffer-name te-log-buffer))
             ;; killed
             (setq te-log-buffer nil)
           (set-buffer te-log-buffer)
           (goto-char (point-max))
           (insert-before-markers string)
           (set-buffer (process-buffer process))))
    (setq te-pending-output (nconc te-pending-output (list string)))
    (te-update-pending-output-display)
    (te-process-output (eq (current-buffer)
                           (window-buffer (selected-window))))
    (set-buffer (process-buffer process))
    (setq te-saved-point (point))))