Home My Page Projects Code Snippets Project Openings Sympa
Summary Activity Tracker Tasks SCM Listes Sympa

SCM Repository

[sympa] Diff of /branches/sympa-6.0-branch/wwsympa/wwsympa.fcgi.in
ViewVC logotype

Diff of /branches/sympa-6.0-branch/wwsympa/wwsympa.fcgi.in

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 6706, Wed Oct 13 08:46:06 2010 UTC revision 7358, Fri May 11 09:00:52 2012 UTC
# Line 15974  Line 15974 
15974  sub do_arc_manage {  sub do_arc_manage {
15975      &wwslog('info', "do_arc_manage ($in{'list'})");      &wwslog('info', "do_arc_manage ($in{'list'})");
15976    
15977        ## Access control
15978        unless (defined &check_authz('do_arc', 'web_archive.access')) {
15979            return undef;
15980        }
15981    
15982      my $search_base = $wwsconf->{'arc_path'}.'/'.$list->get_list_id();      my $search_base = $wwsconf->{'arc_path'}.'/'.$list->get_list_id();
15983      opendir ARC, "$search_base";      opendir ARC, "$search_base";
15984      foreach my $dir (sort {$b cmp $a} grep(!/^\./,readdir ARC)) {      foreach my $dir (sort {$b cmp $a} grep(!/^\./,readdir ARC)) {
# Line 15991  Line 15996 
15996    
15997      &wwslog('info', "do_arc_download ($in{'list'})");      &wwslog('info', "do_arc_download ($in{'list'})");
15998    
15999        ## Access control
16000        unless (defined &check_authz('do_arc', 'web_archive.access')) {
16001            return undef;
16002        }
16003    
16004      ##zip file name:listname_archives.zip      ##zip file name:listname_archives.zip
16005      my $zip_file_name = $in{'list'}.'_archives.zip';      my $zip_file_name = $in{'list'}.'_archives.zip';
16006      my $zip_abs_file = $Conf{'tmpdir'}.'/'.$zip_file_name;      my $zip_abs_file = $Conf{'tmpdir'}.'/'.$zip_file_name;
# Line 16091  Line 16101 
16101    
16102      &wwslog('info', "do_arc_delete ($in{'list'})");      &wwslog('info', "do_arc_delete ($in{'list'})");
16103    
16104        ## Access control
16105        unless (defined &check_authz('do_arc', 'web_archive.access')) {
16106            return undef;
16107        }
16108    
16109      unless (defined  $in{'directories'}){      unless (defined  $in{'directories'}){
16110          &report::reject_report_web('user','select_month',{},$param->{'action'});          &report::reject_report_web('user','select_month',{},$param->{'action'});
16111          &wwslog('info','No Archives months selected');          &wwslog('info','No Archives months selected');

Legend:
Removed from v.6706  
changed lines
  Added in v.7358

contact support
ViewVC Help
Powered by ViewVC 1.0.0