loncom/homework/edit.pm - diff

Return to edit.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.148, 2013/09/05 12:07:29	version 1.150, 2013/12/03 17:22:08
Line 161 sub tag_start {	Line 161 sub tag_start {
if ($target eq "edit") {	if ($target eq "edit") {
my $tag=$token->[1];	my $tag=$token->[1];
if (!$description) {	if (!$description) {
$description=&Apache::lonxml::description($token);	$description=&mt(&Apache::lonxml::description($token));
if (!$description) { $description="<$tag>"; }	if (!$description) { $description="<$tag>"; }
}	}
$result.= &start_table($token)."<tr><td>$description</td>	$result.= &start_table($token)."<tr><td>$description</td>
Line 950 sub checked_arg {	Line 950 sub checked_arg {
my ($value,$text);	my ($value,$text);
if ( ref($option) eq 'ARRAY') {	if ( ref($option) eq 'ARRAY') {
$value='value="'.$$option[0].'"';	$value='value="'.$$option[0].'"';
$text=$$option[1];	$text=&mt($$option[1]);
$option=$$option[0];	$option=$$option[0];
} else {	} else {
$text=$option;	$text=&mt($option);
$value='value="'.$option.'"';	$value='value="'.$option.'"';
}	}
$result.=' <span class="LC_edit_opt"><label><input type="checkbox" '.$value.' name="'.	$result.=' <span class="LC_edit_opt"><label><input type="checkbox" '.$value.' name="'.