From raeburn at source.lon-capa.org  Wed Feb 28 08:20:51 2018
From: raeburn at source.lon-capa.org (raeburn)
Date: Wed, 28 Feb 2018 13:20:51 -0000
Subject: [LON-CAPA-cvs] cvs: loncom /homework optionresponse.pm
Message-ID: <cvsraeburn1519824051@cvsserver>

raeburn		Wed Feb 28 13:20:51 2018 EDT

  Modified files:              
    /loncom/homework	optionresponse.pm 
  Log:
  - Eliminate javascript error in composite page conatining optionresponse.
    - Regular expression in lonpage.pm which is used to append prefix argument
      in call to setSubmittedPart() expects string javascript:setSubmittedPart 
  
  
Index: loncom/homework/optionresponse.pm
diff -u loncom/homework/optionresponse.pm:1.200 loncom/homework/optionresponse.pm:1.201
--- loncom/homework/optionresponse.pm:1.200	Tue Apr 28 13:12:52 2015
+++ loncom/homework/optionresponse.pm	Wed Feb 28 13:20:50 2018
@@ -1,7 +1,7 @@
 # LearningOnline Network with CAPA
 # option list style responses
 #
-# $Id: optionresponse.pm,v 1.200 2015/04/28 13:12:52 raeburn Exp $
+# $Id: optionresponse.pm,v 1.201 2018/02/28 13:20:50 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -795,7 +795,7 @@
 # fieldname is this input field's name after HWVAL_
                   $optionlist='<input type="hidden" name="HWVAL_'.$fieldname.'" value="'.$escdefopt.'" />'.
                   '<input type="checkbox" name="HWCHK_'.$fieldname.'" onclick="javascript:if (this.form.elements[\'HWCHK_'.
-                  $fieldname.'\'].checked) { this.form.elements[\'HWVAL_'.$fieldname.'\'].value=\''.$esccheckboxopt.'\'; } else { this.form.elements[\'HWVAL_'.$fieldname.'\'].value=\''.$escaltopt.'\'; };setSubmittedPart(\''.$part.'\');"'.($defopt eq $checkboxopt?' checked="checked"':'')." />\n";
+                  $fieldname.'\'].checked) { this.form.elements[\'HWVAL_'.$fieldname.'\'].value=\''.$esccheckboxopt.'\'; } else { this.form.elements[\'HWVAL_'.$fieldname.'\'].value=\''.$escaltopt.'\'; };javascript:setSubmittedPart(\''.$part.'\');"'.($defopt eq $checkboxopt?' checked="checked"':'')." />\n";
               } else {
 # classic selection list
 	          $optionlist='<select onchange="javascript:setSubmittedPart(\''.



From raeburn at source.lon-capa.org  Wed Feb 28 09:41:47 2018
From: raeburn at source.lon-capa.org (raeburn)
Date: Wed, 28 Feb 2018 14:41:47 -0000
Subject: [LON-CAPA-cvs] cvs: rat / lonpage.pm
Message-ID: <cvsraeburn1519828907@cvsserver>

raeburn		Wed Feb 28 14:41:47 2018 EDT

  Modified files:              
    /rat	lonpage.pm 
  Log:
  - Bug 6862.
    Avoid a javascript error in Internet Explorer and MS Edge when using
    form.elements[name] when name begins with a number by prepending p_
    to the prefix used to create the name.
  
  
Index: rat/lonpage.pm
diff -u rat/lonpage.pm:1.125 rat/lonpage.pm:1.126
--- rat/lonpage.pm:1.125	Fri Sep 29 19:18:18 2017
+++ rat/lonpage.pm	Wed Feb 28 14:41:47 2018
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Page Handler
 #
-# $Id: lonpage.pm,v 1.125 2017/09/29 19:18:18 raeburn Exp $
+# $Id: lonpage.pm,v 1.126 2018/02/28 14:41:47 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -324,8 +324,8 @@
                               }
                           } elsif ($cellemb{$_} eq 'ssi') {
 # --------------------------------------------------------- This is an SSI cell
-			      my $prefix=$_.'_';
-                              my $idprefix= join('_',($mapid,$resid,''));
+			      my $prefix='p_'.$_.'_';
+                              my $idprefix= 'p_'.join('_',($mapid,$resid,''));
                               my %posthash=('request.prefix' => $prefix,
 					    'LONCAPA_INTERNAL_no_discussion' => 'true',
 					    'symb' => $symb);



From raeburn at source.lon-capa.org  Thu Mar  1 08:11:47 2018
From: raeburn at source.lon-capa.org (raeburn)
Date: Thu, 01 Mar 2018 13:11:47 -0000
Subject: [LON-CAPA-cvs] cvs: loncom(version_2_11_X) /homework
	optionresponse.pm
Message-ID: <cvsraeburn1519909907@cvsserver>

raeburn		Thu Mar  1 13:11:47 2018 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/homework	optionresponse.pm 
  Log:
  - For 2.11
    - Backport 1.201
  
  
Index: loncom/homework/optionresponse.pm
diff -u loncom/homework/optionresponse.pm:1.195.2.2 loncom/homework/optionresponse.pm:1.195.2.3
--- loncom/homework/optionresponse.pm:1.195.2.2	Wed Sep 14 18:30:06 2016
+++ loncom/homework/optionresponse.pm	Thu Mar  1 13:11:47 2018
@@ -1,7 +1,7 @@
 # LearningOnline Network with CAPA
 # option list style responses
 #
-# $Id: optionresponse.pm,v 1.195.2.2 2016/09/14 18:30:06 raeburn Exp $
+# $Id: optionresponse.pm,v 1.195.2.3 2018/03/01 13:11:47 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -760,7 +760,7 @@
 # fieldname is this input field's name after HWVAL_
                   $optionlist='<input type="hidden" name="HWVAL_'.$fieldname.'" value="'.$escdefopt.'" />'.
                   '<input type="checkbox" name="HWCHK_'.$fieldname.'" onclick="javascript:if (this.form.elements[\'HWCHK_'.
-                  $fieldname.'\'].checked) { this.form.elements[\'HWVAL_'.$fieldname.'\'].value=\''.$esccheckboxopt.'\'; } else { this.form.elements[\'HWVAL_'.$fieldname.'\'].value=\''.$escaltopt.'\'; };setSubmittedPart(\''.$part.'\');"'.($defopt eq $checkboxopt?' checked="checked"':'')." />\n";
+                  $fieldname.'\'].checked) { this.form.elements[\'HWVAL_'.$fieldname.'\'].value=\''.$esccheckboxopt.'\'; } else { this.form.elements[\'HWVAL_'.$fieldname.'\'].value=\''.$escaltopt.'\'; };javascript:setSubmittedPart(\''.$part.'\');"'.($defopt eq $checkboxopt?' checked="checked"':'')." />\n";
               } else {
 # classic selection list
 	          $optionlist='<select onchange="javascript:setSubmittedPart(\''.