--- rat/lonpage.pm	2003/10/21 20:40:10	1.54
+++ rat/lonpage.pm	2004/03/22 20:37:06	1.56
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Page Handler
 #
-# $Id: lonpage.pm,v 1.54 2003/10/21 20:40:10 albertel Exp $
+# $Id: lonpage.pm,v 1.56 2004/03/22 20:37:06 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -158,7 +158,7 @@ sub handler {
   my $number_of_columns = 1;
   my $requrl=$r->uri;  
   my $target = $ENV{'form.grade_target'};
-  &Apache::lonnet::logthis("Got a target of $target");
+#  &Apache::lonnet::logthis("Got a target of $target");
   if ($target eq 'meta') {
       &Apache::loncommon::content_type($r,'text/html');
       $r->send_http_header;
@@ -234,6 +234,13 @@ sub handler {
 # --------------------------------------------------------- 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 @@ sub handler {
 			      $r->print('<form method="post" action="'.
 					$requrl.'">');
 			  }
-		      } else {
+		      } elsif ($target eq 'tex') {
 			  $r->print('\documentclass{article}
                                  \newcommand{\keephidden}[1]{}           
                                  \usepackage[dvips]{graphicx}
@@ -402,7 +409,9 @@ sub handler {
                           my $avespan=$lcm/($#colcont+1);
                           for ($j=0;$j<=$#colcont;$j++) {
                               my $rid=$colcont[$j];
-                              my $metainfo='<a href="'.
+                              my $metainfo='<a name="'.
+				  &Apache::lonnet::escape(&Apache::lonnet::declutter($hash{'src_'.$rid})).'" />'.
+				  '<a href="'.
                                     $metalink{$rid}.'" target="LONcatInfo">'.
                           '<img src="/adm/lonMisc/cat_button.gif" border=0>'.
 			  '</img></a><a href="/adm/evaluate?postdata='.