Function: fill-indicator--set-warning

fill-indicator--set-warning is a byte-compiled function defined in display-fill-column-indicator.el.gz.

Signature

(fill-indicator--set-warning)

Documentation

Set the warning face for the fill column indicator.

Source Code

;; Defined in /usr/src/emacs/lisp/display-fill-column-indicator.el.gz
(defun fill-indicator--set-warning ()
  "Set the warning face for the fill column indicator."
  (if-let* ((column (if (integerp display-fill-column-indicator-column)
                        display-fill-column-indicator-column
                      fill-column))
            ((> (save-excursion (end-of-line) (current-column))
                column)))
      (progn
        (face-remap-set-base
         'fill-column-indicator
         'display-fill-column-indicator-warning-face))
    (face-remap-reset-base 'fill-column-indicator)))