[LON-CAPA-cvs] cvs: loncom /homework grades.pm

albertel lon-capa-cvs@mail.lon-capa.org
Thu, 14 Sep 2006 17:52:24 -0000


albertel		Thu Sep 14 13:52:24 2006 EDT

  Modified files:              
    /loncom/homework	grades.pm 
  Log:
  - BUG#5016 - grading when showing the student view of the problem no longer worked
  
  
Index: loncom/homework/grades.pm
diff -u loncom/homework/grades.pm:1.373 loncom/homework/grades.pm:1.374
--- loncom/homework/grades.pm:1.373	Thu Aug 31 16:52:48 2006
+++ loncom/homework/grades.pm	Thu Sep 14 13:52:22 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # The LON-CAPA Grading handler
 #
-# $Id: grades.pm,v 1.373 2006/08/31 20:52:48 albertel Exp $
+# $Id: grades.pm,v 1.374 2006/09/14 17:52:22 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1579,7 +1579,7 @@
     if ($removeform) {
 	$rendered=~s|<form(.*?)>||g;
 	$rendered=~s|</form>||g;
-	$rendered=~s|name="submit"|name="would_have_been_submit"|g;
+	$rendered=~s|(<input[^>]*name\s*=\s*"?)(\w+)("?)|$1would_have_been_$2$3|g;
     }
     my $companswer;
     if ($mode eq 'both' or $mode eq 'answer') {