Function: mh-show-font-lock-fontify-region

mh-show-font-lock-fontify-region is a byte-compiled function defined in mh-show.el.gz.

Signature

(mh-show-font-lock-fontify-region BEG END LOUDLY)

Documentation

Limit font-lock in mh-show-mode to the header.

Used when the option mh-highlight-citation-style is set to
"Gnus", leaving the body to be dealt with by Gnus highlighting.
The region between BEG and END is given over to be fontified and LOUDLY controls if a user sees a message about the fontification operation.

Source Code

;; Defined in /usr/src/emacs/lisp/mh-e/mh-show.el.gz
(defun mh-show-font-lock-fontify-region (beg end loudly)
  "Limit font-lock in `mh-show-mode' to the header.

Used when the option `mh-highlight-citation-style' is set to
\"Gnus\", leaving the body to be dealt with by Gnus highlighting.
The region between BEG and END is given over to be fontified and
LOUDLY controls if a user sees a message about the fontification
operation."
  (let ((header-end (mh-mail-header-end)))
    (cond
     ((and (< beg header-end)(< end header-end))
      (font-lock-default-fontify-region beg end loudly))
     ((and (< beg header-end)(>= end header-end))
      (font-lock-default-fontify-region beg header-end loudly))
     (t
      nil))))