loncom/interface/lonhtmlcommon.pm - diff

Return to lonhtmlcommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.242, 2009/11/10 13:58:55	version 1.244, 2009/11/18 11:18:23
Line 1599 END	Line 1599 END
}	}

sub row_title {	sub row_title {
my ($title,$css_title_class,$css_value_class) = @_;	my ($title,$css_title_class,$css_value_class, $css_value_furtherAttributes) = @_;
$row_count[0]++;	$row_count[0]++;
my $css_class = ($row_count[0] % 2)?'LC_odd_row':'LC_even_row';	my $css_class = ($row_count[0] % 2)?'LC_odd_row':'LC_even_row';
$css_title_class \|\|= 'LC_pick_box_title';	$css_title_class \|\|= 'LC_pick_box_title';
Line 1611 sub row_title {	Line 1611 sub row_title {
$title .= ':';	$title .= ':';
}	}
my $output = <<"ENDONE";	my $output = <<"ENDONE";
<tr class="LC_pick_box_row">	<tr class="LC_pick_box_row" $css_value_furtherAttributes>
<td $css_title_class>	<td $css_title_class>
$title	$title
</td>	</td>
Line 2343 Returns: HTML code with function list st	Line 2343 Returns: HTML code with function list st
sub start_funclist {	sub start_funclist {
my($legendtext)=@_;	my($legendtext)=@_;
$legendtext=&mt('Functions') if !$legendtext;	$legendtext=&mt('Functions') if !$legendtext;
return "<fieldset>\n<legend>$legendtext</legend>\n"	return '<ul class="LC_funclist"><li style="font-weight:bold; margin-left:0.8em;">'.$legendtext.'</li>'."\n";
.'<ul class="LC_funclist">'."\n";
}	}