Function: mh-gnus-article-highlight-citation

mh-gnus-article-highlight-citation is an autoloaded, interactive and byte-compiled function defined in mh-show.el.gz.

Signature

(mh-gnus-article-highlight-citation)

Documentation

Highlight cited text in current buffer using Gnus.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/mh-e/mh-show.el.gz
;;;###mh-autoload
(defun mh-gnus-article-highlight-citation ()
  "Highlight cited text in current buffer using Gnus."
  (interactive)
  ;; Don't allow Gnus to create buttons while highlighting, maybe this is bad
  ;; style?
  (mh-flet
   ((gnus-article-add-button (&rest _args) nil))
   (let* ((modified (buffer-modified-p))
          (gnus-article-buffer (buffer-name))
          (gnus-cite-face-list `(,@(cdr gnus-cite-face-list)
                                 ,(car gnus-cite-face-list))))
     (gnus-article-highlight-citation t)
     (set-buffer-modified-p modified))))