--- loncom/interface/domainprefs.pm 2013/01/09 21:03:20 1.185 +++ loncom/interface/domainprefs.pm 2013/01/09 21:34:26 1.187 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: domainprefs.pm,v 1.185 2013/01/09 21:03:20 raeburn Exp $ +# $Id: domainprefs.pm,v 1.187 2013/01/09 21:34:26 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -407,8 +407,6 @@ sub handler { }; } - - my @roles = ('student','coordinator','author','admin'); my @actions = &Apache::loncommon::get_env_multiple('form.actions'); &Apache::lonhtmlcommon::add_breadcrumb @@ -492,7 +490,6 @@ sub handler { } } } - &Apache::lonconfigsettings::display_choices($r,$phase,$context,\@prefs_order,\%prefs); } return OK; @@ -554,7 +551,6 @@ sub print_config_box { my ($r,$dom,$confname,$phase,$action,$item,$settings) = @_; my $rowtotal = 0; my $output; - if ($action eq 'coursecategories') { $output = &coursecategories_javascript($settings); } @@ -1373,9 +1369,7 @@ sub display_color_options { $datatable .= ''. ''; - foreach my $item (@{$bgs}) { -# my $link = &color_pick($phase,$role,$item,$choices->{$item},$designs->{'bgs'}{$item}); $datatable .= '
'; my $color = $designs->{'bgs'}{$item} ? $designs->{'bgs'}{$item} : $defaults->{'bgs'}{$item}; if ($designs->{'bgs'}{$item}) {