+6.2 XEmacs
+
+In XEmacs, current mime.el can not work, so you should use tm-setup.el
+and another MIME composer, such as mime-compose.el. Following is a
+example:
+
+ (load "tm-setup")
+ ;; (require 'mh-e) ; if you use mh-e, please use it.
+ (load "mime-compose")
+
+6.3 setting sample for hilit19
+
+======================================================================
+(cond (window-system
+ (let* ((header-patterns '(("^Subject:.*$" nil msg-subject)
+ ("^From:.*$" nil msg-from)
+ ("^--text follows this line--$"
+ nil msg-separator)
+ ("^[A-Za-z][A-Za-z0-9-]+:" nil msg-header)
+ ))
+ (body-patterns '(("^\\(In article\\|[ \t]*\\w*[]<>}|]\\).*$"
+ nil msg-quote)))
+ (message-patterns (append header-patterns body-patterns))
+ )
+ (hilit-set-mode-patterns 'msg-header header-patterns)
+ (hilit-set-mode-patterns 'msg-body body-patterns)
+ (hilit-set-mode-patterns 'mime/viewer-mode
+ message-patterns
+ 'hilit-rehighlight-message)
+ )
+ (add-hook 'mime-viewer/content-header-filter-hook
+ (function hilit-rehighlight-buffer-quietly))
+ (add-hook 'mime-viewer/plain-text-preview-hook
+ (function hilit-rehighlight-buffer-quietly))
+ ))
+======================================================================
+
+
+7 How to use mime/viewer-mode