--- loncom/interface/printout.pl 2005/05/02 22:59:11 1.78 +++ loncom/interface/printout.pl 2005/05/03 21:15:28 1.79 @@ -1,7 +1,7 @@ #!/usr/bin/perl # CGI-script to run LaTeX, dvips, ps2ps, ps2pdf etc. # -# $Id: printout.pl,v 1.78 2005/05/02 22:59:11 albertel Exp $ +# $Id: printout.pl,v 1.79 2005/05/03 21:15:28 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -201,12 +201,12 @@ END my $numberofcolumns = $env{'cgi.'.$identifier.'.numcol'}; my $paper = $env{'cgi.'.$identifier.'.paper'}; my $selectionmade = $env{'cgi.'.$identifier.'.selection'}; - my $tableofcontents = $env{'cgi.'.$identifier.'tableofcontents'}; - my $tableofindex = $env{'cgi.'.$identifier.'tableofindex'}; - my $advanced_role = $env{'cgi.'.$identifier.'role'}; - my $number_of_files = $env{'cgi.'.$identifier.'numberoffiles'}+1; - my $student_names = $env{'cgi.'.$identifier.'studentnames'}; - my $backref = &Apache::lonnet::unescape($env{'cgi.'.$identifier.'backref'}); + my $tableofcontents = $env{'cgi.'.$identifier.'.tableofcontents'}; + my $tableofindex = $env{'cgi.'.$identifier.'.tableofindex'}; + my $advanced_role = $env{'cgi.'.$identifier.'.role'}; + my $number_of_files = $env{'cgi.'.$identifier.'.numberoffiles'}+1; + my $student_names = $env{'cgi.'.$identifier.'.studentnames'}; + my $backref = &Apache::lonnet::unescape($env{'cgi.'.$identifier.'.backref'}); my $adv = $env{'request.role.adv'};