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

raeburn raeburn@source.lon-capa.org
Sun, 26 Apr 2009 00:09:53 -0000


raeburn		Sun Apr 26 00:09:53 2009 EDT

  Modified files:              
    /loncom/interface	lonconfigsettings.pm 
  Log:
  - &display_settings() takes additional (optional) arg - $allitems.
  - $allitems is passed as additional arg in call to &courseprefs::print_config_box(). 
  
  
Index: loncom/interface/lonconfigsettings.pm
diff -u loncom/interface/lonconfigsettings.pm:1.2 loncom/interface/lonconfigsettings.pm:1.3
--- loncom/interface/lonconfigsettings.pm:1.2	Wed Apr 22 12:42:16 2009
+++ loncom/interface/lonconfigsettings.pm	Sun Apr 26 00:09:53 2009
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set domain-wide configuration settings
 #
-# $Id: lonconfigsettings.pm,v 1.2 2009/04/22 12:42:16 raeburn Exp $
+# $Id: lonconfigsettings.pm,v 1.3 2009/04/26 00:09:53 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -43,7 +43,7 @@
         ($pagetitle, $brcrumtitle) = ('View/Modify Domain Settings','Domain Settings');
         $action = '/adm/domainprefs';
     } else {
-        ($pagetitle, $brcrumtitle) = ('Set Course Environment','Course Environment');
+        ($pagetitle, $brcrumtitle) = ('Course Configuration','Course Configuration');
         $action = '/adm/courseprefs';
     }
     my $alert = &mt('You must select at least one functionality type to display.');
@@ -180,7 +180,8 @@
 }
 
 sub display_settings {
-    my ($r,$dom,$phase,$context,$prefs_order,$prefs,$values,$confname,$jscript) = @_;
+    my ($r,$dom,$phase,$context,$prefs_order,$prefs,$values,$confname,$jscript,
+        $allitems) = @_;
     my %brcrumtext = &get_crumb_text();
     my @actions = &Apache::loncommon::get_env_multiple('form.actions');
     &Apache::lonhtmlcommon::add_breadcrumb
@@ -202,7 +203,7 @@
                     } else {
                         ($output{$item},$rowtotal{$item}) =
                             &Apache::courseprefs::print_config_box($r,$dom,$phase,
-                                $item,$prefs->{$item},$values);
+                                $item,$prefs->{$item},$values,$allitems);
                     }
                     $rowsum += $rowtotal{$item};
                 }