Great Circle Associates Majordomo-Users
(August 2006)
 

Indexed By Date: [Previous] [Next] Indexed By Thread: [Previous] [Next]

Subject: Re: New question (exchenge to addressee of BOUNCE-mail) 2
From: "Masaaki OYA" <oya @ nro . nao . ac . jp>
Date: Thu, 24 Aug 2006 15:56:21 +0900
To: "Joe R. Jah" <jjah @ cloud . ccsf . cc . ca . us>
Cc: <majordomo-users @ greatcircle . com>
References: <Pine.BSI.4.05L.10608232038150.16080-100000@cloud.ccsf.cc.ca.us>

Dear Joe R. Jah and users

I'm OYA, please teach.
I modified sequencer, but a list member sent to ML, this mail didn't send
to list member, and bounce to list-owner. What shall i do?

Frist of all,
I moved those seven lines inside the if statement , "if ( $infile == 0 ) {".

Next,
These [if statment] moved to lines 191, prior to the default bounce call in
[if statement ] ,"if ($in_hdr) {".

<sequencer>
186 do {
187 $restart = 0;
188 $pre_hdr = 1;
189 while (<IN>) {
190
191 # add next 10 line by M.Oya, 2006/08/24
192 if ( $infile == 0 ) {
193 $non_member_bounce = $config_opts{$opt_l,"non_member_bounce"};
194 if($non_member_bounce =~ /no_one/i){
195 unlink(&fileglob("$TMPDIR", "^resend\.$$\."));
196 exit(0);
197 }
198 &rts($reply_to||$from) if $non_member_bounce =~ /sender/i;
199 " Non-member submission rds from [$from] ";
200 &bounce ("Non-member submission org from [$from]");
201 }
202
203 if ($pre_hdr) {
204 if (/^\s*$/) {
205 # skip leading blank lines; usually only there if this is a
206 # restart after an in-body "Approved:" line
207 next;
208 } else {
209 $pre_hdr = 0;
210 $in_hdr = 1;
211 $kept_last = 0;
212 }
213 }
214 if ($in_hdr) {
215 if (/^\s*$/)



I modified sequencer, add to next line 419 -- 424, and 570 -- 601.

I see why you were reluctant to post a patch; you have so many local patches that it would be useless for most;)

Any way, you have placed non_member_bounce check and "&rts" call outside
restrict post filter; see lines 418 to 429.  They should be activated only
if the sender address is not within the restrict files of the list.  Move
those seven lines inside the if statement, "if ( $infile == 0 ) {", prior
to the default bounce call, "&bounce".  Good luck.

> As Dan suggested in May, you can post your patch to the list. If you
> cannot make a patch on your system you can send your modified sequencer
> instead; the original sequencer is less than 15K.
> > Regards,
> > Joe

Best Regards, ---------------------------------------------------------------------- Nobeyama Radio Observatory, in Japan Computer Support Team Masaaki Oya Tel. 81-267-98-4337 (NRO-SE-room) Fax. 81-267-98-2093  (  ,,  ) E-mail oya @ nro . nao . ac . jp ----------------------------------------------------------------------



Follow-Ups:
References:
Indexed By Date Previous: Re: New question (exchenge to addressee of BOUNCE-mail) 2
From: "Joe R. Jah" <jjah@cloud.ccsf.cc.ca.us>
Next: Re: New question (exchenge to addressee of BOUNCE-mail) 2
From: "Joe R. Jah" <jjah@cloud.ccsf.cc.ca.us>
Indexed By Thread Previous: Re: New question (exchenge to addressee of BOUNCE-mail) 2
From: "Joe R. Jah" <jjah@cloud.ccsf.cc.ca.us>
Next: Re: New question (exchenge to addressee of BOUNCE-mail) 2
From: "Joe R. Jah" <jjah@cloud.ccsf.cc.ca.us>