loncom/homework/optionresponse.pm - diff

Return to optionresponse.pm CVS log

Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/optionresponse.pm between versions 1.151 and 1.151.2.1

version 1.151, 2008/08/08 16:37:13	version 1.151.2.1, 2008/12/11 01:59:01
Line 45 sub start_optionresponse {	Line 45 sub start_optionresponse {
%Apache::hint::option=();	%Apache::hint::option=();
undef(%Apache::response::foilnames);	undef(%Apache::response::foilnames);
if ($target eq 'edit') {	if ($target eq 'edit') {
$result.=&Apache::edit::start_table($token).	$result.=&Apache::edit::start_table($token)
"<tr><td>Multiple Option Response Question ".	.'<tr><td><span class="LC_nobreak">'.&mt('Multiple Option Response Question').'</span> '
&Apache::loncommon::help_open_topic('Option_Response_Problems')."</td><td>Delete:".	.&Apache::loncommon::help_open_topic('Option_Response_Problems')."</td>"
&Apache::edit::deletelist($target,$token)	.'<td><span class="LC_nobreak">'.&mt('Delete?').' '
."</td><td> ".	.&Apache::edit::deletelist($target,$token)
&Apache::edit::end_row().	.'</span></td>'
&Apache::edit::start_spanning_row().	."<td> "
"\n";	.&Apache::edit::end_row()
	.&Apache::edit::start_spanning_row()
	."\n";
$result.=&Apache::edit::text_arg('Max Number Of Shown Foils:','max',	$result.=&Apache::edit::text_arg('Max Number Of Shown Foils:','max',
$token,'4').	$token,'4').
&Apache::edit::select_arg('Randomize Foil Order','randomize',	&Apache::edit::select_arg('Randomize Foil Order:','randomize',
['yes','no'],$token).	['yes','no'],$token).
&Apache::edit::select_arg(&mt('Display of options when printed'),'TeXlayout',	&Apache::edit::select_arg(&mt('Display of options when printed'),'TeXlayout',
[['horizontal',&mt('Normal list')],	[['horizontal','Normal list'],
['vertical',&mt('Listed in a vertical column')]],$token).	['vertical','Listed in a vertical column']],$token).
&Apache::edit::end_row().&Apache::edit::start_spanning_row();	&Apache::edit::end_row().&Apache::edit::start_spanning_row();
} elsif ($target eq 'modified') {	} elsif ($target eq 'modified') {
my $constructtag=&Apache::edit::get_new_args($token,$parstack,	my $constructtag=&Apache::edit::get_new_args($token,$parstack,

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.151
changed lines
	Added in v.1.151.2.1