Variable: mh-folder-font-lock-keywords

mh-folder-font-lock-keywords is a variable defined in mh-folder.el.gz.

Value

(("^\\+.*" (0 'mh-search-folder))
 ("^\\( *[0-9]+\\)\\^.*" (0 'mh-folder-refiled))
 ("^\\( *[0-9]+\\)D.*" (0 'mh-folder-deleted))
 ("^\\( *[0-9]+\\)B.*" (0 'mh-folder-blocklisted))
 ("^\\( *[0-9]+\\)A.*" (0 'mh-folder-allowlisted))
 ("\\(<<\\([^\n]+\\)?\\)" (1 'mh-folder-body nil t))
 (mh-folder-font-lock-subject (1 'mh-folder-followup append t)
			      (2 'mh-folder-subject append t))
 ("^\\( *[0-9]+\\+\\).*" (1 'mh-folder-cur-msg-number))
 ("^\\( *[0-9]+\\)[^^DBA0-9]" (1 'mh-folder-msg-number))
 ("\\([0-9][0-9]/[0-9][0-9]\\)" (1 'mh-folder-date))
 ("\\(To:\\)\\(..............\\)" (1 'mh-folder-to)
  (2 'mh-folder-address))
 ("^ *[0-9]+.\\([bct]\\).....[ ]*\\(..................\\)"
  (1 'mh-folder-sent-to-me-hint) (2 'mh-folder-sent-to-me-sender))
 (mh-folder-font-lock-unseen (1 'bold prepend t))
 (mh-folder-font-lock-tick (1 'mh-folder-tick prepend t)))

Documentation

Keywords (regular expressions) used to fontify the MH-Folder buffer.

Source Code

;; Defined in /usr/src/emacs/lisp/mh-e/mh-folder.el.gz
;;; MH-Folder Font Lock

(defvar mh-folder-font-lock-keywords
  (list
   ;; Folders when displaying index buffer
   (list "^\\+.*"
         '(0 'mh-search-folder))
   ;; Marked for refile
   (list (concat mh-scan-refiled-msg-regexp ".*")
         '(0 'mh-folder-refiled))
   ;; Marked for deletion
   (list (concat mh-scan-deleted-msg-regexp ".*")
         '(0 'mh-folder-deleted))
   ;; Marked for blocklisting
   (list (concat mh-scan-blocklisted-msg-regexp ".*")
         '(0 'mh-folder-blocklisted))
   ;; Marked for allowlisting
   (list (concat mh-scan-allowlisted-msg-regexp ".*")
         '(0 'mh-folder-allowlisted))
   ;; After subject
   (list mh-scan-body-regexp
         '(1 'mh-folder-body nil t))
   ;; Subject
   '(mh-folder-font-lock-subject
     (1 'mh-folder-followup append t)
     (2 'mh-folder-subject append t))
   ;; Current message number
   (list mh-scan-cur-msg-number-regexp
         '(1 'mh-folder-cur-msg-number))
   ;; Message number
   (list mh-scan-good-msg-regexp
         '(1 'mh-folder-msg-number))
   ;; Date
   (list mh-scan-date-regexp
         '(1 'mh-folder-date))
   ;; Messages from me (To:)
   (list mh-scan-rcpt-regexp
         '(1 'mh-folder-to)
         '(2 'mh-folder-address))
   ;; Messages to me
   (list mh-scan-sent-to-me-sender-regexp
         '(1 'mh-folder-sent-to-me-hint)
         '(2 'mh-folder-sent-to-me-sender)))
  "Keywords (regular expressions) used to fontify the MH-Folder buffer.")