Developers of Sympa

[Dominique ROUSSEAU <address@concealed>]

I encountered a little problem with the umask handling in archived.pl

the umask is set in the archived.pl, but not inherited through to
mhonarc.

I attach a small patch that adds a -umask option to mhonarc command line
invocations

Dom

-- 
Dominique Rousseau <address@concealed> - http://www.neuronnexion.com

Inbreeding is how we get championship horses.
*** archived.pl Wed Sep 13 09:56:01 2000
--- /nnx/sympa/inst/sympa-2.7.2/wwsympa/archived.pl     Tue Jun 27 09:21:05 
2000
***************
*** 225,231 ****
        my $yyyy = $1 ;
        my $mm = $2 ;
  
!       system "$conf->{'mhonarc'} -rcfile $mhonarc_ressources -outdir 
$conf->{'arc_path'}/$adrlist/$yyyy-$mm  -definevars \"listname=$listname 
hostname=$hostname yyyy=$yyyy mois=$mm yyyymm=$yyyy-$mm 
wdir=$conf->{'arc_path'} base=$Conf{'wwsympa_url'}/arc \" -umask 
$Conf{'umask'} $conf->{'arc_path'}/$adrlist/$arc/arctxt";
  
      }else{
          do_log('debug',"Rebuilding $adrlist archive completely");
--- 225,231 ----
        my $yyyy = $1 ;
        my $mm = $2 ;
  
!       system "$conf->{'mhonarc'} -rcfile $mhonarc_ressources -outdir 
$conf->{'arc_path'}/$adrlist/$yyyy-$mm  -definevars \"listname=$listname 
hostname=$hostname yyyy=$yyyy mois=$mm yyyymm=$yyyy-$mm 
wdir=$conf->{'arc_path'} base=$Conf{'wwsympa_url'}/arc \" 
$conf->{'arc_path'}/$adrlist/$arc/arctxt";
  
      }else{
          do_log('debug',"Rebuilding $adrlist archive completely");
***************
*** 242,248 ****
            my $yyyy = $1 ;
            my $mm = $2 ;
            
!           system "$conf->{'mhonarc'}  -rcfile $mhonarc_ressources -outdir 
$conf->{'arc_path'}/$adrlist/$yyyy-$mm  -definevars \"listname=$listname 
hostname=$hostname yyyy=$yyyy mois=$mm yyyymm=$yyyy-$mm 
wdir=$conf->{'arc_path'} base=$Conf{'wwsympa_url'}/arc \" -umask 
$Conf{'umask'} $conf->{'arc_path'}/$adrlist/$arc/arctxt";
        }
      }
  }
--- 242,248 ----
            my $yyyy = $1 ;
            my $mm = $2 ;
            
!           system "$conf->{'mhonarc'}  -rcfile $mhonarc_ressources -outdir 
$conf->{'arc_path'}/$adrlist/$yyyy-$mm  -definevars \"listname=$listname 
hostname=$hostname yyyy=$yyyy mois=$mm yyyymm=$yyyy-$mm 
wdir=$conf->{'arc_path'} base=$Conf{'wwsympa_url'}/arc \" 
$conf->{'arc_path'}/$adrlist/$arc/arctxt";
        }
      }
  }
***************
*** 277,283 ****
      my $mhonarc_ressources = &get_ressources ($listname . '@' . $hostname) 
; 
      
      do_log ('debug',"calling $conf->{'mhonarc'} for list 
$listname\@$hostname" ) ;
!     system "$conf->{'mhonarc'} -add -rcfile $mhonarc_ressources -outdir 
$arcpath/$listname\@$hostname/$yyyy-$mm  -definevars \"listname=$listname 
hostname=$hostname yyyy=$yyyy mois=$mm yyyymm=$yyyy-$mm 
wdir=$conf->{'arc_path'} base=$Conf{'wwsympa_url'}/arc -umask $Conf{'umask'} 
\" < $queue/$file";
      
      
      open (ORIG, "$queue/$file") || fatal_err("couldn't open file 
$queue/$file");
--- 277,283 ----
      my $mhonarc_ressources = &get_ressources ($listname . '@' . $hostname) 
; 
      
      do_log ('debug',"calling $conf->{'mhonarc'} for list 
$listname\@$hostname" ) ;
!     system "$conf->{'mhonarc'} -add -rcfile $mhonarc_ressources -outdir 
$arcpath/$listname\@$hostname/$yyyy-$mm  -definevars \"listname=$listname 
hostname=$hostname yyyy=$yyyy mois=$mm yyyymm=$yyyy-$mm 
wdir=$conf->{'arc_path'} base=$Conf{'wwsympa_url'}/arc \" < $queue/$file";
      
      
      open (ORIG, "$queue/$file") || fatal_err("couldn't open file 
$queue/$file");