[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" /> <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" /> <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'};
-
}
}