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

foxr lon-capa-cvs@mail.lon-capa.org
Mon, 28 Mar 2005 12:14:13 -0000


foxr		Mon Mar 28 07:14:13 2005 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  For at least construction space... add a checkbox that, when it has
  code behind it will allow the user to put out >all< foils in e.g.
  option response printouts.  Strategy will be to get this to work for
  author role/construction space, and then expand this to the other
  'privileged' roles that can do this... e.g. course coordinator, and
  instructor...not sure if TA should get this however..
  
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.370 loncom/interface/lonprintout.pm:1.371
--- loncom/interface/lonprintout.pm:1.370	Tue Mar 22 06:59:26 2005
+++ loncom/interface/lonprintout.pm	Mon Mar 28 07:14:13 2005
@@ -1,7 +1,7 @@
 #  The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.370 2005/03/22 11:59:26 foxr Exp $
+# $Id: lonprintout.pm,v 1.371 2005/03/28 12:14:13 foxr Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -2140,9 +2140,13 @@
 	     <message></td></tr><tr><td align="right">Use style file:</td><td></message>
              <message><input type="text" size="40" name="style_file_value" value="$stylevalue"  />&nbsp; <a href="javascript:openbrowser('helpform','style_file','sty')">Select style file</a> </td><td></message>
              <message></td></tr></message>
+	     <choices allowempty="1" multichoice="true" variable="showallfoils">
+                <choice computer="1">Show all foils?</choice>
+             </choices>
 RNDSEED
             &Apache::lonxml::xmlparse($r, 'helper', $xmlfrag);
 	    $helper->{'VARS'}->{'style_file'}=$ENV{'form.style_file_value'};
+	    
 	}
     }