--- loncom/interface/lonprintout.pm	2003/05/14 18:06:36	1.170
+++ loncom/interface/lonprintout.pm	2003/05/14 18:15:03	1.171
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.170 2003/05/14 18:06:36 sakharuk Exp $
+# $Id: lonprintout.pm,v 1.171 2003/05/14 18:15:03 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1387,7 +1387,6 @@ ENDPART
 		$form{'answer_output_mode'}='tex';
 		$form{'rndseed'}=$rndseed;
 		my $answer=&Apache::lonnet::ssi($currentURL,%form);
-#		$r->print('<pre>'.$answer.'</pre>'); return OK;
 		$texversion=~s/(\\keephidden{ENDOFPROBLEM})/$answer$1/;
 	    }
 	    $result .= $texversion;
@@ -1420,7 +1419,7 @@ ENDPART
 	    } elsif ($helper->{'VARS'}->{'PRINT_TYPE'} eq 'all_problems') {
 		$selectionmade = 4;
 	    }
-	    my %form;
+	    my %form;	   
 	    $form{'grade_target'}='tex';
 	    $form{'textwidth'}=$LaTeXwidth;
 	    $form{'symb'}=$master_seq[$i];
@@ -1437,6 +1436,13 @@ ENDPART
 	    } else {
 		$texversion =~ s/\\end{document}//;
 	    }
+	    if($helper->{'VARS'}->{'ANSWER_TYPE'} eq 'no') {
+		my %form;
+		$form{'grade_target'}='answer';
+		$form{'answer_output_mode'}='tex';
+		my $answer=&Apache::lonnet::ssi($urlp,%form);
+		$texversion=~s/(\\keephidden{ENDOFPROBLEM})/$answer$1/;
+	    }
 	    $result .= $texversion;         
 	    $flag_latex_header_remove = 'YES';   
 	}