Re: New question (exchenge to addressee of BOUNCE-mail) 2

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 [email protected]
----------------------------------------------------------------------