3549 |
|
|
3550 |
(defun rmail-fontify-buffer-function () |
(defun rmail-fontify-buffer-function () |
3551 |
;; This function's symbol is bound to font-lock-fontify-buffer-function. |
;; This function's symbol is bound to font-lock-fontify-buffer-function. |
|
(make-local-hook 'rmail-show-message-hook) |
|
3552 |
(add-hook 'rmail-show-message-hook 'rmail-fontify-message nil t) |
(add-hook 'rmail-show-message-hook 'rmail-fontify-message nil t) |
3553 |
;; If we're already showing a message, fontify it now. |
;; If we're already showing a message, fontify it now. |
3554 |
(if rmail-current-message (rmail-fontify-message)) |
(if rmail-current-message (rmail-fontify-message)) |