--- loncom/interface/lonviewclasslist.pm 2014/10/26 15:20:25 1.16 +++ loncom/interface/lonviewclasslist.pm 2015/03/17 00:08:48 1.17 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Handler to display the classlist # -# $Id: lonviewclasslist.pm,v 1.16 2014/10/26 15:20:25 raeburn Exp $ +# $Id: lonviewclasslist.pm,v 1.17 2015/03/17 00:08:48 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -270,7 +270,7 @@ sub html_classlist { } if ($env{'form.action'} eq 'setenv') { - $Str .= &process_student_prefs(); + $Str .= &process_student_prefs($crstype); } $Str .= '

'.$heading.'

'; @@ -297,7 +297,7 @@ sub html_classlist { if ($viewsettings->{'student_opt_in'}) { if ($env{'request.role'} =~ /^st/) { - $Str .= &print_roster_form(); + $Str .= &print_roster_form($crstype); } %publicroster = &Apache::lonnet::dump('publicroster',$cdom,$cnum); } @@ -428,6 +428,7 @@ sub html_classlist { } sub print_roster_form { + my ($crstype) = @_; my $cid = $env{'request.course.id'}; my $showinroster = $env{'environment.internal.'.$cid.'.showinroster'}; my ($showoff,$showon); @@ -438,13 +439,17 @@ sub print_roster_form { $showoff = ' checked="checked" '; $showon = ' '; } + my $singular = 'student'; + if ($crstype eq 'Community') { + $singular = 'member'; + } my $output = '
' .'
'.&mt('Your roster setting').''; if ($showinroster) { - $output .= &mt('You are currently listed in the student-viewable roster.'); + $output .= &mt("You are currently listed in the $singular-viewable roster."); } else { - $output .= &mt('You are currently [_1]not[_2] listed in the student-viewable roster.','',''); + $output .= &mt("You are currently [_1]not[_2] listed in the $singular-viewable roster.",'',''); } $output .= '
'.&mt('Include yourself in the roster?').'  '. '
'. @@ -458,6 +463,7 @@ sub print_roster_form { } sub process_student_prefs { + my ($crstype) = @_; my $cid = $env{'request.course.id'}; my $cdom = $env{'course.'.$cid.'.domain'}; my $cnum = $env{'course.'.$cid.'.num'}; @@ -474,6 +480,11 @@ sub process_student_prefs { if ($pubroster{$student}) { $sturoster = 1; } + + my $singular = 'student'; + if ($crstype eq 'Community') { + $singular = 'member'; + } my $output; if ($sturoster ne $showinroster) { my %changeHash = ( @@ -487,7 +498,7 @@ sub process_student_prefs { if ($result eq 'ok') { $output .= &Apache::lonhtmlcommon::confirm_success( - &mt('Display of your name in the student-viewable roster set to [_1].',''.$visibility.'')); + &mt("Display of your name in the $singular-viewable roster set to [_1].",''.$visibility.'')); } else { $output .= &Apache::lonhtmlcommon::confirm_success( @@ -501,7 +512,7 @@ sub process_student_prefs { } else { $output .= &Apache::lonhtmlcommon::confirm_success( - &mt('Display of your name in the student-viewable roster unchanged (set to [_1]).',''.$visibility.'')); + &mt("Display of your name in the $singular-viewable roster unchanged (set to [_1]).",''.$visibility.'')); } $output = &Apache::loncommon::confirmwrapper($output); return $output;