version 1.78, 2005/05/02 22:59:11
|
version 1.79, 2005/05/03 21:15:28
|
Line 201 END
|
Line 201 END
|
my $numberofcolumns = $env{'cgi.'.$identifier.'.numcol'}; |
my $numberofcolumns = $env{'cgi.'.$identifier.'.numcol'}; |
my $paper = $env{'cgi.'.$identifier.'.paper'}; |
my $paper = $env{'cgi.'.$identifier.'.paper'}; |
my $selectionmade = $env{'cgi.'.$identifier.'.selection'}; |
my $selectionmade = $env{'cgi.'.$identifier.'.selection'}; |
my $tableofcontents = $env{'cgi.'.$identifier.'tableofcontents'}; |
my $tableofcontents = $env{'cgi.'.$identifier.'.tableofcontents'}; |
my $tableofindex = $env{'cgi.'.$identifier.'tableofindex'}; |
my $tableofindex = $env{'cgi.'.$identifier.'.tableofindex'}; |
my $advanced_role = $env{'cgi.'.$identifier.'role'}; |
my $advanced_role = $env{'cgi.'.$identifier.'.role'}; |
my $number_of_files = $env{'cgi.'.$identifier.'numberoffiles'}+1; |
my $number_of_files = $env{'cgi.'.$identifier.'.numberoffiles'}+1; |
my $student_names = $env{'cgi.'.$identifier.'studentnames'}; |
my $student_names = $env{'cgi.'.$identifier.'.studentnames'}; |
my $backref = &Apache::lonnet::unescape($env{'cgi.'.$identifier.'backref'}); |
my $backref = &Apache::lonnet::unescape($env{'cgi.'.$identifier.'.backref'}); |
|
|
|
|
my $adv = $env{'request.role.adv'}; |
my $adv = $env{'request.role.adv'}; |