loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.50, 2002/08/12 18:06:55	version 1.51, 2002/08/14 20:38:04
Line 140 ENDPART	Line 140 ENDPART
my $laystyle = 'book';	my $laystyle = 'book';
my $result = '';	my $result = '';
my $number_of_columns = 1;	my $number_of_columns = 1;
# my $number_of_columns = $ENV{'form.numberofcolumns'};

if ($choice eq 'Standard LaTeX output for current document') {	if ($choice eq 'Standard LaTeX output for current document') {
#-- single document - problem, page, html, xml	#-- single document - problem, page, html, xml
Line 294 ENDPART	Line 293 ENDPART
}	}
$result = &additional_cleanup($result);	$result = &additional_cleanup($result);






}	}
#-- corrections for the different page formats	#-- corrections for the different page formats
if ($layout eq 'CBI' and $numberofcolumns eq '1') {	if ($layout eq 'CBI' and $numberofcolumns eq '1') {
Line 353 ENDPART	Line 348 ENDPART
}	}
print $temp_file $result;	print $temp_file $result;
$r->print(<<FINALEND);	$r->print(<<FINALEND);
<meta http-equiv="Refresh" content="0; url=/cgi-bin/printout.pl?$filename&$laystyle">	<meta http-equiv="Refresh" content="0; url=/cgi-bin/printout.pl?$filename&$laystyle&$numberofcolumns">
</body>	</body>
</html>	</html>
FINALEND	FINALEND