loncom/interface/lonprintout.pm - diff

Return to lonprintout.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.285, 2004/03/23 16:17:48	version 1.286, 2004/03/23 19:36:51
Line 663 sub recalcto_mm {	Line 663 sub recalcto_mm {

sub get_textwidth {	sub get_textwidth {
my ($helper,$LaTeXwidth)=@_;	my ($helper,$LaTeXwidth)=@_;
	my $textwidth=$LaTeXwidth;
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'});	$textwidth=&recalcto_mm($helper->{'VARS'}->{'pagesize.width'}.' '.
} else {	$helper->{'VARS'}->{'pagesize.widthunit'});
$moreenv{'textwidth'}=$LaTeXwidth;
}	}
	return $textwidth;
}	}

sub output_data {	sub output_data {