[LON-CAPA-cvs] cvs: loncom /interface domainprefs.pm

[raeburn]

raeburn		Fri Sep  7 10:34:28 2012 EDT

  Modified files:              
    /loncom/interface	domainprefs.pm 
  Log:
  - Missing concatenator.
  - Eliminate unused scalar.
  
  
Index: loncom/interface/domainprefs.pm
diff -u loncom/interface/domainprefs.pm:1.169 loncom/interface/domainprefs.pm:1.170
--- loncom/interface/domainprefs.pm:1.169	Mon Aug 27 06:28:05 2012
+++ loncom/interface/domainprefs.pm	Fri Sep  7 10:34:28 2012
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set domain-wide configuration settings
 #
-# $Id: domainprefs.pm,v 1.169 2012/08/27 06:28:05 raeburn Exp $
+# $Id: domainprefs.pm,v 1.170 2012/09/07 10:34:28 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -415,10 +415,10 @@
         if (keys(%servers) > 1) {
             my ($othertitle,$usertypes,$types) =
                 &Apache::loncommon::sorted_inst_types($dom);
-            $js = &lonbalance_targets_js($dom,$types,\%servers).
-                  &new_spares_js().
-                  &common_domprefs_js().
-                  &Apache::loncommon::javascript_array_indexof();
+            $js .= &lonbalance_targets_js($dom,$types,\%servers).
+                   &new_spares_js().
+                   &common_domprefs_js().
+                   &Apache::loncommon::javascript_array_indexof();
         }
         &Apache::lonconfigsettings::display_settings($r,$dom,$phase,$context,\@prefs_order,\%prefs,\%domconfig,$confname,$js);
     } else {
@@ -2386,7 +2386,7 @@
     return unless ((ref($toggles) eq 'ARRAY') && (ref($defaultchecked) eq 'HASH') &&
                    (ref($choices) eq 'HASH'));
 
-    my (%checkedon,%checkedoff,$datatable,$css_class,$cell_colspan);
+    my (%checkedon,%checkedoff,$datatable,$css_class);
 
     foreach my $item (@{$toggles}) {
         if ($defaultchecked->{$item} eq 'on') {