--- loncom/interface/lonprintout.pm	2003/10/30 20:58:51	1.261
+++ loncom/interface/lonprintout.pm	2003/11/10 23:26:42	1.263
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.261 2003/10/30 20:58:51 sakharuk Exp $
+# $Id: lonprintout.pm,v 1.263 2003/11/10 23:26:42 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -701,6 +701,7 @@ ENDPART
 	    if ($helper->{'VARS'}->{'ANSWER_TYPE'} ne 'only') {
 		my %moreenv;
 		$moreenv{'request.filename'}=$currentURL;
+		if ($helper->{'VARS'}->{'style_file'}=~/\w/) {$moreenv{'construction_space_style'}=$helper->{'VARS'}->{'style_file'};}
 		my %form;
 		$form{'grade_target'}='tex';
 		$form{'textwidth'}=$LaTeXwidth;	
@@ -1087,7 +1088,7 @@ ENDPART
 	return SERVER_ERROR; 
     }
 
-    my $identifier = time.'_'.int(rand(1000));
+    my $identifier = &Apache::loncommon::get_cgi_id();
     &Apache::lonnet::appenv('cgi.'.$identifier.'.file'   => $filename,
                             'cgi.'.$identifier.'.layout'  => $laystyle,
                             'cgi.'.$identifier.'.numcol'  => $numberofcolumns,
@@ -1194,6 +1195,7 @@ sub printHelper {
     $helper->declareVar('filename');
     $helper->declareVar('construction');
     $helper->declareVar('assignment');
+    $helper->declareVar('style_file');
     
     # This will persistently load in the data we want from the
     # very first screen.
@@ -1542,7 +1544,10 @@ CHOOSE_FROM_ANY_SEQUENCE
 		<defaultvalue>
 	            return $helper->{VARS}->{'curseed'};
 	        </defaultvalue>
-	     </string>
+	    </string>
+	     <message></td></tr><tr><td align="right">Use style file: </td><td></message>
+	    <string variable="style_file" size="25" maxlength="50">
+	    </string>
              <message></td></tr></message>
 RNDSEED
             &Apache::lonxml::xmlparse($r, 'helper', $xmlfrag);