version 1.157, 2013/04/30 03:03:34
|
version 1.157.2.2, 2016/09/14 18:18:51
|
Line 80 sub start_radiobuttonresponse {
|
Line 80 sub start_radiobuttonresponse {
|
$result=&Apache::response::meta_package_write('radiobuttonresponse'); |
$result=&Apache::response::meta_package_write('radiobuttonresponse'); |
} elsif ($target eq 'edit' ) { |
} elsif ($target eq 'edit' ) { |
$result.=&Apache::edit::start_table($token) |
$result.=&Apache::edit::start_table($token) |
.'<tr><td>'.&Apache::lonxml::description($token) |
.'<tr><td>'.&Apache::loncommon::insert_folding_button() |
|
.&Apache::lonxml::description($token) |
.&Apache::loncommon::help_open_topic('Radio_Response_Problems') |
.&Apache::loncommon::help_open_topic('Radio_Response_Problems') |
.'</td>' |
.'</td>' |
.'<td><span class="LC_nobreak">'.&mt('Delete?').' ' |
.'<td><span class="LC_nobreak">'.&mt('Delete?').' ' |
Line 824 sub html_radiobutton {
|
Line 825 sub html_radiobutton {
|
|
|
my $result='<label>'; |
my $result='<label>'; |
|
|
$result .= '<input type="radio" |
$result .= '<input type="radio" ' |
onchange="javascript:setSubmittedPart(' . "'$part');\"" |
. 'onchange="javascript:setSubmittedPart(' . "'$part');\" " |
. 'name="HWVAL_' . $fieldname . '"' |
. 'name="HWVAL_' . $fieldname . '" ' |
. "value='$value'"; |
. 'value="'.$value.'"'; |
|
|
if (defined($last_responses->{$name})) { |
if (defined($last_responses->{$name})) { |
$result .= ' checked="checked" '; |
$result .= ' checked="checked" '; |