--- loncom/homework/matchresponse.pm 2014/02/27 14:41:34 1.90 +++ loncom/homework/matchresponse.pm 2018/06/08 11:57:57 1.92.2.1 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Full matching style response # -# $Id: matchresponse.pm,v 1.90 2014/02/27 14:41:34 bisitz Exp $ +# $Id: matchresponse.pm,v 1.92.2.1 2018/06/08 11:57:57 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -55,7 +55,7 @@ sub start_matchresponse { $result=&Apache::response::meta_package_write('matchresponse'); } elsif ($target eq 'edit' ) { $result.=&Apache::edit::start_table($token). - ''.&Apache::lonxml::description($token).'' + ''.&Apache::loncommon::insert_folding_button().&Apache::lonxml::description($token).'' .''.&mt('Delete?').' ' .&Apache::edit::deletelist($target,$token) .'' @@ -319,7 +319,8 @@ sub start_foilgroup { &Apache::response::pushrandomnumber(undef,$target); if ($target eq 'edit') { $result.=&Apache::edit::start_table($token) - .''.&mt('Collection Of Foils').'' + .''.&Apache::loncommon::insert_folding_button() + .&mt('Collection Of Foils').'' .''.&mt('Delete?') .&Apache::edit::deletelist($target,$token) .'' @@ -581,6 +582,9 @@ sub format_prior_answer { foreach my $name (@{ $foil_order }) { my $item = &HTML::Entities::encode(shift(@items),'<>&"'); + if ($item eq '') { + $item = ' '; + } $output .= ''.$item.''; } return if (!defined($output)); @@ -681,7 +685,7 @@ sub displayfoils { my $last_letter=$name_letter_map{$lastopt}; my $optionlist = ''; if ($target ne 'tex') { - $optionlist="\n"; + $optionlist="\n"; } else { if ($Apache::lonhomework::type ne 'exam') { if($env{'form.pdfFormFields'} eq 'yes' @@ -698,7 +702,7 @@ sub displayfoils { foreach $option (@used_letters) { if ($option eq $last_letter) { if ($target ne 'tex') { - $optionlist.="\n"; + $optionlist.="\n"; } elsif ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes' && $Apache::inputtags::status['-1'] eq 'CAN_ANSWER' && $Apache::lonhomework::type ne 'exam') { @@ -706,7 +710,7 @@ sub displayfoils { } } else { if ($target ne 'tex') { - $optionlist.="\n"; + $optionlist.="\n"; } elsif ($target eq 'tex' && $env{'form.pdfFormFields'} eq 'yes' && $Apache::inputtags::status['-1'] eq 'CAN_ANSWER' && $Apache::lonhomework::type ne 'exam') {