[Mimedefang] change_header doesn't add header

[Marco Berizzi]

David F. Skoll wrote:

>Marco Berizzi wrote:
>
> > The last row is action_change_header("Precedence", "bulk");
>
>Hmmm... That should work.  It eventually boils down to a
>smfi_chgheader call into libmilter that looks like this:
>
>     smfi_chgheader(ctx, "Precedence", 1, "bulk");
>
>And according to http://www.milter.org/milter_api/smfi_chgheader.html,
>
>"Header index value (1-based). A hdridx value of 1 will modify the
>  first occurrence of a header named headerf. If hdridx is greater than
>  the number of times headerf appears, a new copy of headerf will be
>  added."
>
>Maybe try turning Milter logging way up and see what it says?
>
>O Milter.LogLevel=99 in sendmail.cf, or define(`confMILTER_LOG_LEVEL', 
>`99')
>in sendmail .mc

I was forgot to tell you that I'm using MIMEDefang 2.54/Sendmail 8.12.11
Here is milter log:

Milter (mimedefang): init success to negotiate
Milter: connect to filters
milter=mimedefang, action=connect, continue
Milter (mimedefang): time command (C), 0
milter=mimedefang, action=helo, continue
Milter (mimedefang): time command (H), 0
Milter: senders: <mycompany.myuser at mycustomer.XXX>
milter=mimedefang, action=mail, continue
Milter (mimedefang): time command (M), 0
Milter: rcpts: <marco at mycompany.XXX>
milter=mimedefang, action=rcpt, continue
Milter (mimedefang): time command (R), 0
from=<mycompany.myuser at mycustomer.XXX>, size=4433, class=0, nrcpts=1, 
msgid=<57C2AE000560EB468CDFF935CBF89EB60160C48E at Bqqqq>, proto=ESMTP, 
daemon=MTA, relay=qqqq.XXX [x.x.x.x]
Milter (mimedefang): headers, send
Milter (mimedefang): header, Received
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Content-Transfer-Encoding
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Received
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Importance
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Priority
milter=mimedefang, action=header, continue
Milter (mimedefang): header, X-MimeOLE
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Content-Class
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Return-Receipt-To
milter=mimedefang, action=header, continue
Milter (mimedefang): header, MIME-Version
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Content-Type
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Disposition-Notification-To
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Subject
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Date
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Message-ID
milter=mimedefang, action=header, continue
Milter (mimedefang): header, X-MS-Has-Attach
milter=mimedefang, action=header, continue
Milter (mimedefang): header, X-MS-TNEF-Correlator
milter=mimedefang, action=header, continue
Milter (mimedefang): header, thread-index
milter=mimedefang, action=header, continue
Milter (mimedefang): header, From
milter=mimedefang, action=header, continue
Milter (mimedefang): header, To
milter=mimedefang, action=header, continue
Milter (mimedefang): header, Return-Path
milter=mimedefang, action=header, continue
Milter (mimedefang): header, X-OriginalArrivalTime
milter=mimedefang, action=header, continue
Milter (mimedefang): headers, sent
milter=mimedefang, action=eoh, continue
Milter (mimedefang): body, send
milter=mimedefang, action=body, continue
Milter (mimedefang): body, sent
mimedefang.pl[10039]: 
MDLOG,jAPAVnbU010267,mail_in,,,<mycompany.myuser at mycustomer.XXX>,<marco at mycompany.XXX>,
Milter delete: header  Disposition-Notification-To: "myuser Diego 
\\(mycompany\\)" <mycompany.myuser at mycustomer.XXX>
Milter delete: header  Return-Receipt-To: "myuser Diego \\(mycompany\\)" 
<mycompany.myuser at mycustomer.XXX>
Milter add: header: X-Spam-Score: 1.346 (*) HTML_MESSAGE,MISSING_SUBJECT
Milter change: header  Content-Type: from 
multipart/alternative;\n\tboundary="----_=_NextPart_001_01C5F1AB.6DA8E6BD" 
to text/plain;\n\tcharset="iso-8859-1"
Milter change: header  MIME-Version: from 1.0 to 1.0
Milter change: header  Content-Transfer-Encoding: from 7bit to 
quoted-printable
Milter message: body replaced
Milter add: header: X-Scanned-By: MIMEDefang 2.54 on myip
Milter accept: message
Milter (mimedefang): quit filter
to=<marco at mycompany.XXX>, delay=00:00:01, xdelay=00:00:00, mailer=esmtp, 
pri=34433, relay=[172.16.1.21] [172.16.1.21], dsn=2.0.0, stat=Sent (OK)