--- loncom/interface/domainprefs.pm 2011/08/10 14:54:42 1.152 +++ loncom/interface/domainprefs.pm 2011/08/15 05:16:30 1.153 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: domainprefs.pm,v 1.152 2011/08/10 14:54:42 raeburn Exp $ +# $Id: domainprefs.pm,v 1.153 2011/08/15 05:16:30 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -399,7 +399,8 @@ sub handler { &Apache::loncommon::sorted_inst_types($dom); $js = &lonbalance_targets_js($dom,$types,\%servers). &new_spares_js(). - &common_domprefs_js(); + &common_domprefs_js(). + &Apache::loncommon::javascript_array_indexof(); } &Apache::lonconfigsettings::display_settings($r,$dom,$phase,$context,\@prefs_order,\%prefs,\%domconfig,$confname,$js); } else { @@ -2762,7 +2763,7 @@ sub print_loadbalancing { if (ref($types) eq 'ARRAY') { $rownum += scalar(@{$types}); } - my $css_class = 'class="LC_odd_row"'; + my $css_class = ' class="LC_odd_row"'; my $targets_div_style = 'display: none'; my $disabled_div_style = 'display: block'; my $homedom_div_style = 'display: none'; @@ -2835,14 +2836,14 @@ sub print_loadbalancing { $datatable .= ''. &loadbalancing_rules($dom,$intdom,$currrules,$othertitle, $usertypes,$types,\%servers,$currbalancer, - $targets_div_style,$homedom_div_style); + $targets_div_style,$homedom_div_style,$css_class); $$rowtotal += $rownum; return $datatable; } sub loadbalancing_rules { my ($dom,$intdom,$currrules,$othertitle,$usertypes,$types,$servers, - $currbalancer,$targets_div_style,$homedom_div_style) = @_; + $currbalancer,$targets_div_style,$homedom_div_style,$css_class) = @_; my $output; my ($alltypes,$othertypes,$titles) = &loadbalancing_titles($dom,$intdom,$usertypes,$types); @@ -2859,7 +2860,7 @@ sub loadbalancing_rules { } $output .= &loadbalance_rule_row($type,$titles->{$type},$current, $servers,$currbalancer,$dom, - $targets_div_style,$homedom_div_style); + $targets_div_style,$homedom_div_style,$css_class); } } return $output; @@ -2897,7 +2898,7 @@ sub loadbalancing_titles { sub loadbalance_rule_row { my ($type,$title,$current,$servers,$currbalancer,$dom,$targets_div_style, - $homedom_div_style) = @_; + $homedom_div_style,$css_class) = @_; my @rulenames = ('default','homeserver'); my %ruletitles = &offloadtype_text(); if ($type eq '_LC_external') { @@ -2910,7 +2911,7 @@ sub loadbalance_rule_row { $style = $homedom_div_style; } my $output = - '
'.$title.'
'."\n". + '
'.$title.'
'."\n". '
'."\n"; for (my $i=0; $i<@rulenames; $i++) { my $rule = $rulenames[$i];