--- rat/lonpage.pm	2010/07/13 00:16:23	1.94
+++ rat/lonpage.pm	2011/07/28 02:53:33	1.95
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Page Handler
 #
-# $Id: lonpage.pm,v 1.94 2010/07/13 00:16:23 raeburn Exp $
+# $Id: lonpage.pm,v 1.95 2011/07/28 02:53:33 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -354,6 +354,8 @@ sub handler {
                                   $output=~s/\<\/form[^\>]*\>//gsi;
                                   $output=~
 				      s/\<((?:input|select|button|textarea)[^\>]+)name\s*\=\s*[\'\"]*([^\'\"]+)[\'\"]*([^\>]*)\>/\<$1 name="$prefix$2" $3\>/gsi;
+                                  $output=~
+                                      s/\<((?:input|select)[^\>]+\Qjavascript:setSubmittedPart\E)\(\s*[\'\"]([^\'\"]+)[\'\"]*\s*\)/\<$1('$2','$prefix')/gsi;
                               }
                               $thisdir=~s/\/[^\/]*$//;
 			      foreach (@rlinks) {