loncom/interface/loncommon.pm - diff

Return to loncommon.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.692.4.34, 2010/04/03 21:58:48	version 1.692.4.36, 2010/07/21 22:23:08
Line 4770 sub standard_css {	Line 4770 sub standard_css {
h1, h2, h3, th { font-family: $sans }	h1, h2, h3, th { font-family: $sans }
a:focus { color: red; background: yellow }	a:focus { color: red; background: yellow }

hr {
clear: both;
color: $tabbg;
background-color: $tabbg;
height: 3px;
border: none;
}

table.thinborder,	table.thinborder,

table.thinborder tr th {	table.thinborder tr th {
Line 8229 sub csv_print_select_table {	Line 8221 sub csv_print_select_table {
my ($value,$display,$defaultcol)=@{ $array_ref };	my ($value,$display,$defaultcol)=@{ $array_ref };
$r->print(&start_data_table_row().'<td>'.$display.'</td>');	$r->print(&start_data_table_row().'<td>'.$display.'</td>');

$r->print('<td><select name"f'.$i.'"'.	$r->print('<td><select name="f'.$i.'"'.
' onchange="javascript:flip(this.form,'.$i.');">');	' onchange="javascript:flip(this.form,'.$i.');">');
$r->print('<option value="none"></option>');	$r->print('<option value="none"></option>');
foreach my $sample (sort({$a <=> $b} keys(%{ $samples->[0] }))) {	foreach my $sample (sort({$a <=> $b} keys(%{ $samples->[0] }))) {