loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.270.2.1, 2004/02/19 19:35:06	version 1.270.2.2, 2004/03/15 20:27:57
Line 985 ENDPART	Line 985 ENDPART
my %moreenv;	my %moreenv;
if ($helper->{'VARS'}->{'pagesize.width'}=~/\d+/ &&	if ($helper->{'VARS'}->{'pagesize.width'}=~/\d+/ &&
$helper->{'VARS'}->{'pagesize.widthunit'}=~/\w+/) {	$helper->{'VARS'}->{'pagesize.widthunit'}=~/\w+/) {
$moreenv{'textwidth'}=&recalcto_mm($helper->{'VARS'}->{'pagesize.width'}.' '.$helper->{'VARS'}->{'pagesize.widthunit'});	$moreenv{'form.textwidth'}=&recalcto_mm($helper->{'VARS'}->{'pagesize.width'}.' '.$helper->{'VARS'}->{'pagesize.widthunit'});
} else {	} else {
$moreenv{'textwidth'}=$LaTeXwidth;	$moreenv{'form.textwidth'}=$LaTeXwidth;
}	}
&Apache::lonnet::appenv(%moreenv);	&Apache::lonnet::appenv(%moreenv);
my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,'Print Status','Class Print Status',$#students+1);	my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,'Print Status','Class Print Status',$#students+1);