[LON-CAPA-cvs] cvs: rat / lonpage.pm

[sakharuk]

sakharuk		Mon Mar 22 15:37:06 2004 EDT

  Modified files:              
    /rat	lonpage.pm 
  Log:
  Pages can be printed now but not for the problems marked as exam ones. There are still LaTeX conflicts between different LaTeX environments. The possibility to print pages was broken down due to use of form hash to pass data to ssi call (earlier it was done trough the ENV hash).
  
  
Index: rat/lonpage.pm
diff -u rat/lonpage.pm:1.55 rat/lonpage.pm:1.56
--- rat/lonpage.pm:1.55	Tue Feb 24 14:14:42 2004
+++ rat/lonpage.pm	Mon Mar 22 15:37:06 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Page Handler
 #
-# $Id: lonpage.pm,v 1.55 2004/02/24 19:14:42 www Exp $
+# $Id: lonpage.pm,v 1.56 2004/03/22 20:37:06 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -234,6 +234,13 @@
 # --------------------------------------------------------- This is an SSI cell
 			      my $prefix=$_.'_';
                               my %posthash=('request.prefix' => $prefix);
+			      if ($ENV{'form.grade_target'} eq 'tex') {
+				  $posthash{'grade_target'}=$ENV{'form.grade_target'};
+				  $posthash{'textwidth'}=$ENV{'form.textwidth'};
+				  $posthash{'problem_split'}=$ENV{'form.problem_split'};
+				  $posthash{'latex_type'}=$ENV{'form.latex_type'};
+				  $posthash{'rndseed'}=$ENV{'form.rndseed'};
+			      }
                               if (($ENV{'form.'.$prefix.'submit'}) 
                                || ($ENV{'form.all_submit'})) {
                                foreach (keys %ENV) {
@@ -377,7 +384,7 @@
 			      $r->print('<form method="post" action="'.
 					$requrl.'">');
 			  }
-		      } else {
+		      } elsif ($target eq 'tex') {
 			  $r->print('\documentclass{article}
                                  \newcommand{\keephidden}[1]{}           
                                  \usepackage[dvips]{graphicx}