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

raeburn raeburn at source.lon-capa.org
Thu Jun 7 11:58:11 EDT 2018


raeburn		Thu Jun  7 15:58:11 2018 EDT

  Modified files:              
    /loncom/homework	matchresponse.pm rankresponse.pm 
  Log:
  - Bug 6883 -- specific to MS Edge on Windows 10 (rev. 1803).
  
  
Index: loncom/homework/matchresponse.pm
diff -u loncom/homework/matchresponse.pm:1.93 loncom/homework/matchresponse.pm:1.94
--- loncom/homework/matchresponse.pm:1.93	Fri Jan 22 22:42:51 2016
+++ loncom/homework/matchresponse.pm	Thu Jun  7 15:58:10 2018
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Full matching style response
 #
-# $Id: matchresponse.pm,v 1.93 2016/01/22 22:42:51 damieng Exp $
+# $Id: matchresponse.pm,v 1.94 2018/06/07 15:58:10 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -685,7 +685,7 @@
 	    my $last_letter=$name_letter_map{$lastopt};
 	    my $optionlist = '';
 	    if ($target ne 'tex') {
-		$optionlist="<option></option>\n";
+		$optionlist="<option value=\"\"></option>\n";
 	    } else {
 		if ($Apache::lonhomework::type ne 'exam') {
                     if($env{'form.pdfFormFields'} eq 'yes'
@@ -702,7 +702,7 @@
 	    foreach $option (@used_letters) {
 		if ($option eq $last_letter) {
 		    if ($target ne 'tex') {
-                        $optionlist.="<option selected=\"selected\">$option</option>\n";
+                        $optionlist.="<option value=\"$option\" selected=\"selected\">$option</option>\n";
                     } elsif ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes'
                              && $Apache::inputtags::status['-1'] eq 'CAN_ANSWER'
                              && $Apache::lonhomework::type ne 'exam') {
@@ -710,7 +710,7 @@
                     }
 		} else {
 		    if ($target ne 'tex') {
-                        $optionlist.="<option>$option</option>\n";
+                        $optionlist.="<option value=\"$option\">$option</option>\n";
                     } elsif ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes'
                              && $Apache::inputtags::status['-1'] eq 'CAN_ANSWER'
                              && $Apache::lonhomework::type ne 'exam') {
Index: loncom/homework/rankresponse.pm
diff -u loncom/homework/rankresponse.pm:1.73 loncom/homework/rankresponse.pm:1.74
--- loncom/homework/rankresponse.pm:1.73	Fri Jan 22 22:42:51 2016
+++ loncom/homework/rankresponse.pm	Thu Jun  7 15:58:11 2018
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # rank style response
 #
-# $Id: rankresponse.pm,v 1.73 2016/01/22 22:42:51 damieng Exp $
+# $Id: rankresponse.pm,v 1.74 2018/06/07 15:58:11 raeburn Exp $
 # Copyright Michigan State University Board of Trustees
 #
 # This file is part of the LearningOnline Network with CAPA (LON-CAPA).
@@ -410,7 +410,7 @@
 	    my $lastopt=$lastresponse{$name};
 	    my $optionlist='';
 	    if ($target ne 'tex') {
-                $optionlist = "<option></option>\n";
+                $optionlist = "<option value=\"\"></option>\n";
             } 
             if ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes') {
                 my $fieldname = $env{'request.symb'}.'&part_'.$Apache::inputtags::part.'&rankresponse'.'&HWVAL_'.$Apache::inputtags::response['-1'].':'.$temp;
@@ -420,13 +420,13 @@
 	    foreach $option (@whichopt) {
 		if ($option eq $lastopt) {
 		    if ($target ne 'tex' ) {
-                        $optionlist.="<option selected=\"selected\">$option</option>\n";
+                        $optionlist.="<option value=\"$option\" selected=\"selected\">$option</option>\n";
                     } elsif ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes') {
                         $optionlist .= &Apache::lonxml::print_pdf_add_combobox_option($option); 
                     }
 		} else {
 		    if ($target ne 'tex') {
-                        $optionlist.="<option>$option</option>\n";
+                        $optionlist.="<option value=\"$option\">$option</option>\n";
                     } elsif ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes') {
                         $optionlist .= &Apache::lonxml::print_pdf_add_combobox_option($option); 
                     }




More information about the LON-CAPA-cvs mailing list