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

bowersj2 lon-capa-cvs@mail.lon-capa.org
Thu, 01 May 2003 15:01:04 -0000


bowersj2		Thu May  1 11:01:04 2003 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  Files works better, but filter is not working right yet.
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.137 loncom/interface/lonprintout.pm:1.138
--- loncom/interface/lonprintout.pm:1.137	Wed Apr 30 16:03:14 2003
+++ loncom/interface/lonprintout.pm	Thu May  1 11:01:04 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.137 2003/04/30 20:03:14 bowersj2 Exp $
+# $Id: lonprintout.pm,v 1.138 2003/05/01 15:01:04 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1440,12 +1440,13 @@
         &Apache::lonxml::xmlparse($r, 'helper', <<CHOOSE_FROM_SUBDIR);
   <state name="CHOOSE_FROM_SUBDIR" title="Select Files">
     <message>Select problems you wish to print from <b>$subdir</b></message>
-    <files variable="FILES">
+    <files variable="FILES" multichoice='1'>
       <nextstate>FINAL</nextstate>
-      <filechoice>$subdir</filechoice>
+      <filechoice>return '$subdir';</filechoice>
       <filefilter>return $f =~ 
-           m/^[^\.]+\.(problem|exam|quiz|assess|survey|form|library)$/;
+           m/^[^\\.]+\\.(problem|exam|quiz|assess|survey|form|library)$/;
       </filefilter>
+      </files>
     </state>
 CHOOSE_FROM_SUBDIR
     }