Function: compilation--set-up-arrow-spec-in-margins

compilation--set-up-arrow-spec-in-margins is a byte-compiled function defined in compile.el.gz.

Signature

(compilation--set-up-arrow-spec-in-margins)

Documentation

Set up compilation-arrow-overlay to display as an arrow in margins.

Source Code

;; Defined in /usr/src/emacs/lisp/progmodes/compile.el.gz
(defun compilation--set-up-arrow-spec-in-margins ()
  "Set up `compilation-arrow-overlay' to display as an arrow in margins."
  (setq overlay-arrow-string "")
  (setq compilation-arrow-overlay
	(make-overlay overlay-arrow-position overlay-arrow-position))
  (overlay-put compilation-arrow-overlay
               'before-string compilation--dummy-string)
  (mapc #'compilation--set-up-margin (get-buffer-window-list nil nil t))
  (add-hook 'window-buffer-change-functions #'compilation--set-up-margin nil t)
  ;; Take precautions against `compilation-mode' getting reinitialized.
  (add-hook 'change-major-mode-hook
            #'compilation--tear-down-arrow-spec-in-margins nil t))