From mboxrd@z Thu Jan 1 00:00:00 1970 X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/54836 Path: main.gmane.org!not-for-mail From: Reiner Steib <4.uce.03.r.s@nurfuerspam.de> Newsgroups: gmane.emacs.gnus.general Subject: Re: follow-up & CC Date: Tue, 18 Nov 2003 17:05:42 +0100 Organization: Dept. of Theoretical Physics, University of Ulm Sender: ding-owner@lists.math.uh.edu Message-ID: References: Reply-To: reiner.steib@gmx.de NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii X-Trace: sea.gmane.org 1069173057 8324 80.91.224.253 (18 Nov 2003 16:30:57 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Tue, 18 Nov 2003 16:30:57 +0000 (UTC) Original-X-From: ding-owner+M3376@lists.math.uh.edu Tue Nov 18 17:30:54 2003 Return-path: Original-Received: from malifon.math.uh.edu ([129.7.128.13]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1AM8kg-0001i8-00 for ; Tue, 18 Nov 2003 17:30:54 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.math.uh.edu) by malifon.math.uh.edu with smtp (Exim 3.20 #1) id 1AM8k7-0003Nq-00; Tue, 18 Nov 2003 10:30:19 -0600 Original-Received: from justine.libertine.org ([66.139.78.221] ident=postfix) by malifon.math.uh.edu with esmtp (Exim 3.20 #1) id 1AM8jz-0003Nk-00 for ding@lists.math.uh.edu; Tue, 18 Nov 2003 10:30:11 -0600 Original-Received: from main.gmane.org (main.gmane.org [80.91.224.249]) by justine.libertine.org (Postfix) with ESMTP id BC5C33A0045 for ; Tue, 18 Nov 2003 10:30:10 -0600 (CST) Original-Received: from list by main.gmane.org with local (Exim 3.35 #1 (Debian)) id 1AM8jx-0002Np-00 for ; Tue, 18 Nov 2003 17:30:09 +0100 Mail-Followup-To: ding@gnus.org X-Injected-Via-Gmane: http://gmane.org/ Original-To: ding@gnus.org Original-Received: from sea.gmane.org ([80.91.224.252]) by main.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1AM8ju-0002Nh-00 for ; Tue, 18 Nov 2003 17:30:06 +0100 Original-Received: from news by sea.gmane.org with local (Exim 3.35 #1 (Debian)) id 1AM8ju-000286-00 for ; Tue, 18 Nov 2003 17:30:06 +0100 Original-Lines: 38 Original-X-Complaints-To: usenet@sea.gmane.org X-Face: #vK]N[`vqjuod*|)'[iD7/"3AB-ApT%fmN"LWAg@oS7OesGv~)n[OBTLM#I="J'Y^-7I I/ps7o_'IK@#-Rs{::DZ@O8yS|fexe,XslY[:dNWOb~>?mC-&i_c)say:"\IpA.5U.b]'NY;Pks{lb h.+#6%DpZuaK3dcHB`Av3zc:r!C%~s0&m,tWj]&},qg.+0ww2gK%f!:GK|wMl.I!(voY*1"^li8"~B BNG)9LvPi?^DMR-GVDnZqhu*3Hi,+g=wFhI)BL6&u{EOVEHjVEVq~d?_}lMntWAc3(6?kftjc>_f>! g0wM(qPM$d5]^TT_Qyi&L?LGVG)SHN;Gk/,pkY9,~ Mail-Copies-To: nobody User-Agent: Gnus/5.1003 (Gnus v5.10.3) Emacs/21.3 (gnu/linux) Cancel-Lock: sha1:JAlMY8Bxz81z4P1FIs5FevI5C94= Precedence: bulk Xref: main.gmane.org gmane.emacs.gnus.general:54836 X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:54836 On Wed, Nov 12 2003, Sam Steingold wrote: > +(defvar message-header-synonyms > + '((To Cc Bcc)) > + "List of lists of header synonyms. > +E.g., if this list contains a member list with elements `Cc' and `To', > +then `message-carefully-insert-headers' will not insert a `To' header > +when the message is already `Cc'ed to the recipient.") > + > (defun message-carefully-insert-headers (headers) > + "Insert the headers, an alist, into the message buffer. > +Does not insert the headers when they are already present there > +or in the synonym headers, defined by `message-header-synonyms'." [...] Committed, thanks. > + when (and old-header (string-match new-header old-header)) Hm, another problem here. Say, I have "To: bar@foo.invalid.my.domain" in the current message. Then, the following examples wont work as expected: - (message-carefully-insert-headers '((To . "bar@foo.invalid"))) - (message-carefully-insert-headers '((To . "ar@foo.invalid.my.domain"))) - (setq case-fold-search nil) (message-carefully-insert-headers '((To . "bar@FOO.INVALID.my.domain"))) Maybe it would be better to use something like (gnus-string-equal (nth 1 (mail-extract-address-components ...))). Bye, Reiner. -- ,,, (o o) ---ooO-(_)-Ooo--- PGP key available via WWW http://rsteib.home.pages.de/