--- loncom/homework/rankresponse.pm 2014/05/05 17:40:54 1.71
+++ loncom/homework/rankresponse.pm 2016/01/22 22:42:51 1.73
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# rank style response
#
-# $Id: rankresponse.pm,v 1.71 2014/05/05 17:40:54 bisitz Exp $
+# $Id: rankresponse.pm,v 1.73 2016/01/22 22:42:51 damieng Exp $
# Copyright Michigan State University Board of Trustees
#
# This file is part of the LearningOnline Network with CAPA (LON-CAPA).
@@ -51,7 +51,8 @@ sub start_rankresponse {
$result=&Apache::response::meta_package_write('rankresponse');
} 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)
.' | '
@@ -361,7 +362,7 @@ sub displayfoils {
my $text=$Apache::response::foilgroup{$name.'.text'};
my $value=shift(@correctorder);
if ($target eq 'web') {
- $result.='
'.$value.': '.$text;
+ $result.=''.$value.': '.$text.'
';
} else {
$result.=' \strut\\\\\strut '.$value.':'.$text;
}
@@ -443,15 +444,17 @@ sub displayfoils {
}
my $text=$Apache::response::foilgroup{$name.'.text'};
if ($target ne 'tex') {
+ $result .= '';
if ($Apache::lonhomework::type ne 'exam') {
- $result.='
'.$optionlist.$text."\n";
+ $result.=$optionlist.$text."\n";
} else {
- $result.='
'.$text."\n";
+ $result.=$text."\n";
}
if ($Apache::lonhomework::type eq 'exam') {
my @values=(1..scalar(@whichopt));
$result.=&Apache::optionresponse::webbubbles(\@values,\@whichopt,$temp,$lastopt);
}
+ $result .= '
';
} else {
if ($Apache::lonhomework::type eq 'exam') {
my $itemlabel;