[LON-CAPA-cvs] cvs: loncom(version_1_1_X) /interface lonprintout.pm

albertel lon-capa-cvs@mail.lon-capa.org
Mon, 15 Mar 2004 20:27:57 -0000


albertel		Mon Mar 15 15:27:57 2004 EDT

  Modified files:              (Branch: version_1_1_X)
    /loncom/interface	lonprintout.pm 
  Log:
  - I guess we'll be doing a 1.1.3. Grrr.
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.270.2.1 loncom/interface/lonprintout.pm:1.270.2.2
--- loncom/interface/lonprintout.pm:1.270.2.1	Thu Feb 19 14:35:06 2004
+++ loncom/interface/lonprintout.pm	Mon Mar 15 15:27:57 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.270.2.1 2004/02/19 19:35:06 albertel Exp $
+# $Id: lonprintout.pm,v 1.270.2.2 2004/03/15 20:27:57 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -985,9 +985,9 @@
 	 my %moreenv;
 	 if ($helper->{'VARS'}->{'pagesize.width'}=~/\d+/ &&
 	     $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 {
-	     $moreenv{'textwidth'}=$LaTeXwidth;
+	     $moreenv{'form.textwidth'}=$LaTeXwidth;
 	 }
 	 &Apache::lonnet::appenv(%moreenv);
 	 my %prog_state=&Apache::lonhtmlcommon::Create_PrgWin($r,'Print Status','Class Print Status',$#students+1);