Lines Matching defs:font
42 (require 'font-lock)
148 ;; that font-lock will update it (if needed)...
699 (defun mh-header-field-font-lock (field limit)
700 "Return the value of a header field FIELD to font-lock.
718 (defun mh-header-to-font-lock (limit)
719 "Return the value of a header field To to font-lock.
721 (mh-header-field-font-lock "To:" limit))
723 (defun mh-header-cc-font-lock (limit)
724 "Return the value of a header field cc to font-lock.
726 (mh-header-field-font-lock "cc:" limit))
728 (defun mh-header-subject-font-lock (limit)
729 "Return the value of a header field Subject to font-lock.
731 (mh-header-field-font-lock "Subject:" limit))
733 (defun mh-letter-header-font-lock (limit)
734 "Return the entire mail header to font-lock.
745 (defun mh-show-font-lock-fontify-region (beg end loudly)
746 "Limit font-lock in `mh-show-mode' to the header.
756 (font-lock-default-fontify-region beg end loudly))
758 (font-lock-default-fontify-region beg header-end loudly))
762 (defvar mh-show-font-lock-keywords
766 (mh-header-to-font-lock
769 (mh-header-cc-font-lock
775 (mh-header-subject-font-lock
784 (mh-letter-header-font-lock
789 (defun mh-show-font-lock-keywords ()
790 "Return variable `mh-show-font-lock-keywords'."
791 mh-show-font-lock-keywords)
793 (defvar mh-show-font-lock-keywords-with-cite
798 mh-show-font-lock-keywords
807 (2 font-lock-constant-face nil t)
808 (4 font-lock-comment-face nil t))))))
812 (defun mh-show-font-lock-keywords-with-cite ()
813 "Return variable `mh-show-font-lock-keywords-with-cite'."
814 mh-show-font-lock-keywords-with-cite)
825 (defvar font-lock-auto-fontify)
854 (make-local-variable 'font-lock-defaults)
855 ;;(set (make-local-variable 'font-lock-support-mode) nil)
857 ((equal mh-highlight-citation-style 'font-lock)
858 (setq font-lock-defaults '(mh-show-font-lock-keywords-with-cite t)))
860 (setq font-lock-defaults '((mh-show-font-lock-keywords)
862 (font-lock-fontify-region-function
863 . mh-show-font-lock-fontify-region)))
866 (setq font-lock-defaults '(mh-show-font-lock-keywords t))))
868 font-lock-auto-fontify)
869 (turn-on-font-lock))