--- loncom/interface/lonprintout.pm	2004/03/23 16:17:48	1.285
+++ loncom/interface/lonprintout.pm	2004/03/23 19:36:51	1.286
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.285 2004/03/23 16:17:48 albertel Exp $
+# $Id: lonprintout.pm,v 1.286 2004/03/23 19:36:51 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -663,12 +663,13 @@ sub recalcto_mm {
 
 sub get_textwidth {
     my ($helper,$LaTeXwidth)=@_;
+    my $textwidth=$LaTeXwidth;
     if ($helper->{'VARS'}->{'pagesize.width'}=~/\d+/ &&
 	$helper->{'VARS'}->{'pagesize.widthunit'}=~/\w+/) {
-	$moreenv{'textwidth'}=&recalcto_mm($helper->{'VARS'}->{'pagesize.width'}.' '.$helper->{'VARS'}->{'pagesize.widthunit'});
-    } else {
-	$moreenv{'textwidth'}=$LaTeXwidth;
+	$textwidth=&recalcto_mm($helper->{'VARS'}->{'pagesize.width'}.' '.
+				$helper->{'VARS'}->{'pagesize.widthunit'});
     }
+    return $textwidth;
 }
 
 sub output_data {