Ted Zlatanov <[email protected]> writes:
> I am sure integrating this with posting styles won't be too hard
> either.
I ended up with the following function, and using group parameters, to
have it in message-send-hook.
(defun my-assd-in-subject () (interactive)
(let ((s (message-field-value "subject")))
(unless (string-match "{ASSD}" s)
(save-excursion
(message-goto-subject)
(message-delete-line)
(insert (concat "Subject: {ASSD} " s "\n"))))))
This function will probably fail if the subject line is empty.
I needed this too:
(add-to-list 'gnus-newsgroup-variables 'message-send-hook)
and these are the group parameters:
((message-send-hook 'my-assd-in-subject))
Which will need to be tweaked to allow more than one hook function.
Thank you,
Johann
_______________________________________________
info-gnus-english mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/info-gnus-english
