--- loncom/homework/radiobuttonresponse.pm 2015/04/07 15:26:24 1.157.2.1
+++ loncom/homework/radiobuttonresponse.pm 2019/02/03 22:02:21 1.157.2.3
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# mutliple choice style responses
#
-# $Id: radiobuttonresponse.pm,v 1.157.2.1 2015/04/07 15:26:24 raeburn Exp $
+# $Id: radiobuttonresponse.pm,v 1.157.2.3 2019/02/03 22:02:21 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -80,7 +80,8 @@ sub start_radiobuttonresponse {
$result=&Apache::response::meta_package_write('radiobuttonresponse');
} elsif ($target eq 'edit' ) {
$result.=&Apache::edit::start_table($token)
- .'
'.&Apache::lonxml::description($token)
+ .' |
'.&Apache::loncommon::insert_folding_button()
+ .&Apache::lonxml::description($token)
.&Apache::loncommon::help_open_topic('Radio_Response_Problems')
.' | '
.''.&mt('Delete?').' '
@@ -1029,7 +1030,8 @@ sub display_latex_exam {
. '} \hspace*{\fill} \\\\';
}
else {
- $result .= '\textbf{' . $Apache::lonxml::counter . '}.';
+ $result .= '\textbf{' . $Apache::lonxml::counter . '}.'.
+ '\hspace*{2 mm}';
}
# Now output the bubbles themselves:
@@ -1046,7 +1048,15 @@ sub display_latex_exam {
}
my $preindent;
if ($bubble_number > 0) {
- $preindent = '\hspace*{3 mm}';
+ my $offset = 5;
+ if ($Apache::lonxml::counter) {
+ if ($identifier) {
+ $offset += 2 * (length($identifier)-1);
+ } else {
+ $offset += 2 * (length($Apache::lonxml::counter)-1);
+ }
+ }
+ $preindent = '\hspace*{'.$offset.' mm}';
}
my $foiltext = $Apache::response::foilgroup{$name . '.text'};
$foiltext =~ s/\\noindent//; # forgive me for I have sinned..
|