version 1.127, 2005/04/07 06:56:23
|
version 1.129, 2005/04/19 03:58:23
|
Line 1460 END
|
Line 1460 END
|
$name,$section]); |
$name,$section]); |
my $col = 5; |
my $col = 5; |
foreach my $time ($start,$end) { |
foreach my $time ($start,$end) { |
$excel_sheet->write($row,$col++, |
if (defined($time) && $time != 0) { |
|
$excel_sheet->write($row,$col++, |
&Apache::lonstathelpers::calc_serial($time), |
&Apache::lonstathelpers::calc_serial($time), |
$format->{'date'}); |
$format->{'date'}); |
|
} else { |
|
$excel_sheet->write($row,$col++,'none'); |
|
} |
} |
} |
$excel_sheet->write($row,$col++,$status); |
$excel_sheet->write($row,$col++,$status); |
$row++; |
$row++; |
Line 2208 sub upfile_drop_add {
|
Line 2212 sub upfile_drop_add {
|
sub drop_student_list { |
sub drop_student_list { |
my $r=shift; |
my $r=shift; |
my $count=0; |
my $count=0; |
my @droplist; |
my @droplist = &Apache::loncommon::get_env_multiple('form.droplist'); |
if (ref($env{'form.droplist'})) { |
|
@droplist = @{$env{'form.droplist'}}; |
|
} else { |
|
@droplist = ($env{'form.droplist'}); |
|
} |
|
foreach (@droplist) { |
foreach (@droplist) { |
my ($uname,$udom)=split(/\:/,$_); |
my ($uname,$udom)=split(/\:/,$_); |
# drop student |
# drop student |