Hello I have asked that question some time ago, but it was pointed out to me that supercite was the culprit. I desactived supercite and my problem remains:
I have written a function which adds at the beginning of each mail a message which is based on an entry in the bbdb. Like --8<------------------------schnipp------------------------->8--- Hello Joe, Thanks for your last message, > Joe wrote: > Look this is a great idea --8<------------------------schnapp------------------------->8--- The point is how that should be combined with gnus-summary-reply-with-original? I just added in the message-setup-hook: (add-hook 'message-setup-hook 'bbdbciteadpt-insert-bbdbcite) However the problem is that the function is executed before gnus-summary-reply-with-original is finished, leading to: --8<------------------------schnipp------------------------->8--- > Joe wrote: > Look this is a great idea Hello Joe, Thanks for your last message, --8<------------------------schnapp------------------------->8--- So this is set at the end instead of the beginning of the message. So I thought maybe defadvice is my friend. By using (defadvice gnus-summary-reply-with-original (after mybbdbcite activate) "Runs bbdbcite after the gnus-summary-reply-with-original function." (bbdbciteadpt-insert-bbdbcite)) But it did not work. Another strange thing: Does somebody has an idea? --8<------------------------schnipp------------------------->8--- `message-setup-hook' is a variable declared in Lisp. -- loaded from "message" Value: ((lambda nil (set (make-local-variable (quote user-mail-address)) "[EMAIL PROTECTED]") (let ((user-full-name "Uwe Brauer") (user-mail-address "[EMAIL PROTECTED]")) (save-excursión (message-remove-header "From") (message-goto-eoh) (insert "From: " (message-make-from) "\n")))) (lambda nil (save-excursión (message-remove-header "Reply-To") (let ((value "Uwe Brauer <[EMAIL PROTECTED]>")) (when value (message-goto-eoh) (insert "Reply-To" ": " value) (unless (bolp) (insert "\n")))))) t) This value is specific to the current buffer. Default-value: (bbdb-insinuate-message bbdb-define-all-aliases turn-on-iso-accents-mode bbdbciteadpt-insert-bbdbcite) --8<------------------------schnapp------------------------->8--- Does somebody has and idea? thanks Uwe Brauer _______________________________________________ info-gnus-english mailing list info-gnus-english@gnu.org http://lists.gnu.org/mailman/listinfo/info-gnus-english
