Function: gnus-kill-file-raise-followups-to-author
gnus-kill-file-raise-followups-to-author is an autoloaded, interactive
and byte-compiled function defined in gnus-kill.el.gz.
Signature
(gnus-kill-file-raise-followups-to-author LEVEL)
Documentation
Raise score for all followups to the current author.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/gnus-kill.el.gz
(defun gnus-kill-file-raise-followups-to-author (level)
"Raise score for all followups to the current author."
(interactive "p")
(let ((name (mail-header-from gnus-current-headers))
string)
(save-excursion
(gnus-kill-set-kill-buffer)
(goto-char (point-min))
(setq name (read-string (concat "Add " level
" to followup articles to: ")
(regexp-quote name)))
(setq
string
(format
"(gnus-kill %S %S '(gnus-summary-temporarily-raise-by-thread %S))\n"
"From" name level))
(insert string)
(gnus-kill-file-apply-string string))
(gnus-message
6 "Added temporary score file entry for followups to %s." name)))