--- loncom/interface/lonprintout.pm	2003/05/07 19:00:56	1.156
+++ loncom/interface/lonprintout.pm	2003/05/12 18:14:01	1.161
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.156 2003/05/07 19:00:56 bowersj2 Exp $
+# $Id: lonprintout.pm,v 1.161 2003/05/12 18:14:01 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1710,6 +1710,7 @@ sub printHelper {
         if ($ENV{'form.url'}) {
             $helper->{VARS}->{'symb'} = &Apache::lonnet::symbread($helper->{VARS}->{'postdata'});
         }
+    }
 
     if ($ENV{'form.symb'}) {
         $helper->{VARS}->{'symb'} = $ENV{'form.symb'};
@@ -1885,11 +1886,26 @@ CHOOSE_FROM_SUBDIR
     $paramHash = Apache::lonhelper::getParamHash();
     $paramHash->{MESSAGE_TEXT} = "";
     Apache::lonhelper::message->new();
+
     $paramHash = Apache::lonhelper::getParamHash();
     $paramHash->{'variable'} = 'PRINT_TYPE';
     $helper->declareVar('PRINT_TYPE');
     $paramHash->{CHOICES} = $printChoices;
     Apache::lonhelper::choices->new();
+
+    if (1) {
+        $paramHash = Apache::lonhelper::getParamHash();
+        $paramHash->{MESSAGE_TEXT} = "<hr>";
+        Apache::lonhelper::message->new();
+
+        $paramHash = Apache::lonhelper::getParamHash();
+        $paramHash->{CHOICES} = [
+                                   ['Print with answer', '1'],
+                                   ['Print without answers', '0'] ];
+        $paramHash->{'variable'} = 'PRINT_WITH_ANSWERS';
+        Apache::lonhelper::choices->new();
+    }
+
     Apache::lonprintout::page_format_state->new("FORMAT");
 
     # Generate the PAGESIZE state which will offer the user the margin