[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