--- loncom/interface/multidownload.pl 2008/12/30 23:18:24 1.38 +++ loncom/interface/multidownload.pl 2011/12/21 21:25:40 1.39 @@ -2,7 +2,7 @@ # CGI-script to allow download of all essay submissions of # multiple students. # -# $Id: multidownload.pl,v 1.38 2008/12/30 23:18:24 raeburn Exp $ +# $Id: multidownload.pl,v 1.39 2011/12/21 21:25:40 www Exp $ # Copyright Michigan State University Board of Trustees # # This file is part of the LearningOnline Network with CAPA (LON-CAPA). @@ -100,8 +100,7 @@ if (&Apache::lonnet::allowed('vgr',$scop my $courseid = $env{'request.course.id'}; my @stuchecked = split(/\n/,$env{'cgi.'.$identifier.'.students'}); my $number_of_students = scalar(@stuchecked); - my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin('','Processing Status', - 'Preparing Zip File',$number_of_students,'inline','80'); + my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin('',$number_of_students); my @parts = split(/\n/,$env{'cgi.'.$identifier.'.parts'}); my $doc_zip_root = $Apache::lonnet::perlvar{'lonZipDir'}; my $uname = $env{'user.name'}; @@ -119,7 +118,7 @@ if (&Apache::lonnet::allowed('vgr',$scop my $current_student = 0; foreach my $stu (@stuchecked) { $current_student ++; - &Apache::lonhtmlcommon::Update_PrgWin('',\%prog_state,"Processing student $current_student of $number_of_students"); + &Apache::lonhtmlcommon::Update_PrgWin('',\%prog_state,&mt("Processing student [_1] of [_2]",$current_student,$number_of_students)); my %files_saved; my ($stuname,$studom,$fullname) = split(/:/,$stu); my %record = &Apache::lonnet::restore($symb,$courseid,$studom,$stuname);