Function: compilation--hide-output

compilation--hide-output is a byte-compiled function defined in compile.el.gz.

Signature

(compilation--hide-output START)

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/compile.el.gz
(defun compilation--hide-output (start)
  (save-excursion
    (goto-char start)
    (beginning-of-line)
    ;; Apply the match to each line, but wait until we have a complete
    ;; line.
    (let ((start (point)))
      (while (search-forward "\n" nil t)
        (save-restriction
          (narrow-to-region start (point))
          (dolist (regexp (ensure-list compilation-hidden-output))
            (goto-char start)
            (while (re-search-forward regexp nil t)
              (add-text-properties (match-beginning 0) (match-end 0)
                                   '( invisible t
                                      rear-nonsticky t))))
          (goto-char (point-max)))))))