[LON-CAPA-cvs] cvs: modules /gci londocsgci.pm

[gci]

gci		Tue Sep 14 06:23:16 2010 EDT

  Modified files:              
    /modules/gci	londocsgci.pm 
  Log:
  - Customization for GCI_3
    - New pilot questions.
    - Eliminate individual web forms for each question in Concept
      Test Editor.   
  
  
Index: modules/gci/londocsgci.pm
diff -u modules/gci/londocsgci.pm:1.11 modules/gci/londocsgci.pm:1.12
--- modules/gci/londocsgci.pm:1.11	Fri Jan 15 18:21:08 2010
+++ modules/gci/londocsgci.pm	Tue Sep 14 06:23:15 2010
@@ -2,7 +2,7 @@
 # Custom Edit Course Routines for Assembly of Valid Concept Tests from
 # Geoscience Concept Inventory. 
 #
-# $Id: londocsgci.pm,v 1.11 2010/01/15 18:21:08 gci Exp $
+# $Id: londocsgci.pm,v 1.12 2010/09/14 06:23:15 gci Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -115,7 +115,7 @@
         $revreqs{$prereqs{$item}} = $item;
     }
     @defchosen=('01','02','03','07','12','18','26','32','37','38','47','54','63','66','2004_73');
-    @development = ('001','002','003','004','005','006','007','008','009','010','011','012','013','014');
+    @development = ('001','002','003','004','005','006','007','008','009','010','011','012','013','014','015','016','017','018','019','020','021','022');
 }
 
 sub checkvalid {
@@ -361,6 +361,10 @@
         }
         $output .= '<b>'.$title.'</b></td>';
         my $content=&Apache::lonindexer::showpreview($url);
+        my $startformtag = '<form name="lonhomework" enctype="multipart/form-data" method="post" action="'.$url.'?inhibitmenu=yes" >';
+        my $endtag = '<table><tr><td><input onmouseup="javascript:setSubmittedPart';
+        $content =~ s/^\Q$startformtag\E//;
+        $content =~ s/\Q$endtag\E.+$//s;
         $output .= '<td> '.($content eq '' ? '&nbsp;':$content).' </td>'."\n".
                    &Apache::loncommon::end_data_table_row();
     }