--- loncom/interface/domainprefs.pm 2009/05/26 20:39:22 1.97 +++ loncom/interface/domainprefs.pm 2009/07/25 14:44:50 1.98 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to set domain-wide configuration settings # -# $Id: domainprefs.pm,v 1.97 2009/05/26 20:39:22 tempelho Exp $ +# $Id: domainprefs.pm,v 1.98 2009/07/25 14:44:50 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1019,7 +1019,7 @@ sub print_quotas { my $typecount = 0; my $css_class; if ($context eq 'requestcourses') { - @usertools = ('official','unofficial'); + @usertools = ('official','unofficial','community'); } else { @usertools = ('aboutme','blog','portfolio'); } @@ -1117,7 +1117,9 @@ sub print_quotas { $typecount ++; $css_class = $typecount%2?' class="LC_odd_row"':''; $datatable .= ''. - '
'.&mt('LON-CAPA Advanced Users').''. + ''.&mt('LON-CAPA Advanced Users'). + ' ('. + &mt('overrides affiliation').')'. '
'; foreach my $item (@usertools) { my $checked; @@ -1138,8 +1140,7 @@ sub print_quotas { '" value="_LC_adv" '.$checked.'/>'.$titles{$item}. '  '; } - $datatable .= '('.&mt('overrides affiliation'). - ')'; + $datatable .= ''; $$rowtotal += $typecount; return $datatable; } @@ -1471,6 +1472,7 @@ sub tool_titles { portfolio => 'Portfolio', official => 'Official courses (with institutional codes)', unofficial => 'Unofficial courses', + community => 'Communities', ); return %titles; } @@ -3348,7 +3350,7 @@ sub modify_quotas { $context = $action; } if ($context eq 'requestcourses') { - @usertools = ('official','unofficial'); + @usertools = ('official','unofficial','community'); } else { @usertools = ('aboutme','blog','portfolio'); }