[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm

albertel lon-capa-cvs-allow@mail.lon-capa.org
Mon, 23 Jul 2007 22:16:34 -0000


albertel		Mon Jul 23 18:16:34 2007 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  - BUG#5328 - CSTR style file not functional
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.502 loncom/interface/lonprintout.pm:1.503
--- loncom/interface/lonprintout.pm:1.502	Wed Jul  4 10:17:36 2007
+++ loncom/interface/lonprintout.pm	Mon Jul 23 18:16:31 2007
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.502 2007/07/04 14:17:36 foxr Exp $
+# $Id: lonprintout.pm,v 1.503 2007/07/23 22:16:31 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1396,9 +1396,6 @@
 		$moreenv{'request.filename'}=$cleanURL;
 		if ($helper->{'VARS'}->{'style_file'}=~/\w/) {
 		    $moreenv{'construct.style'}=$helper->{'VARS'}->{'style_file'};
-		    my $dom = $env{'user.domain'};
-		    my $user = $env{'user.name'};
-		    my $put_result = &Apache::lonnet::put('environment',{'construct.style'=>$helper->{'VARS'}->{'style_file'}},$dom,$user);
 		}
                 if ($helper->{'VARS'}->{'probstatus'} eq 'exam') {$form{'problemtype'}='exam';}
 		$form{'problem_split'}=$parmhash{'problem_stream_switch'};
@@ -2946,17 +2943,15 @@
 	        </defaultvalue>
 	    </string>
 	     <message></td></tr><tr><td align="right">
-             <label for="style_file_value">$stylefiletext</label>:
+             <label for="style_file">$stylefiletext</label>:
              </td><td></message>
-             <message><input type="text" size="40" name="style_file_value" value="$stylevalue"  />&nbsp; <a href="javascript:openbrowser('helpform','style_file_value','sty')">Select style file</a> </td><tr><td></message>
+             <message><input type="text" size="40" name="style_file" value="$stylevalue"  />&nbsp; <a href="javascript:openbrowser('helpform','style_file','sty')">Select style file</a> </td><tr><td></message>
 	     <choices allowempty="1" multichoice="true" variable="showallfoils">
                 <choice computer="1">Show all foils?</choice>
              </choices>
 	     <message></td></tr></message>
 RNDSEED
             &Apache::lonxml::xmlparse($r, 'helper', $xmlfrag);
-	    $helper->{'VARS'}->{'style_file'}=$env{'form.style_file_value'};
-	    
 	} 
     }