--- loncom/homework/grades.pm 2007/11/03 00:08:09 1.477 +++ loncom/homework/grades.pm 2007/11/03 00:18:37 1.478 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # The LON-CAPA Grading handler # -# $Id: grades.pm,v 1.477 2007/11/03 00:08:09 albertel Exp $ +# $Id: grades.pm,v 1.478 2007/11/03 00:18:37 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3394,8 +3394,8 @@ sub editgrades { } my (undef,undef,$url) = &Apache::lonnet::decode_symb($symb); foreach my $partid (@partid) { - $header .= 'Old Score'. - 'New Score'; + $header .= ''.&mt('Old Score').''. + ''.&mt('New Score').''; $columns{$partid}=2; foreach my $stores (@parts) { my ($part,$type) = &split_part_type($stores); @@ -3404,16 +3404,16 @@ sub editgrades { my $display=&Apache::lonnet::metadata($url,$stores.'.display'); $display =~ s/\[Part: (\w)+\]//; $display =~ s/Number of Attempts/Tries/; - $header .= 'Old '.$display.''. - 'New '.$display.''; + $header .= ''.&mt('Old '.$display).''. + ''.&mt('New '.$display).''; $columns{$partid}+=2; } } foreach my $partid (@partid) { my $display_part=&get_display_part($partid,$symb); - $result .= 'Part: '.$display_part. - ' (Weight = '.$weight{$partid}.')'; + $result .= ''. + &mt('Part: [_1] (Weight = [_2])',$display_part,$weight{$partid}). + ''; } $result .= &Apache::loncommon::end_data_table_header_row(). @@ -3433,7 +3433,8 @@ sub editgrades { if (!&canmodify($usec)) { my $numcols=scalar(@partid)*4+2; push(@noupdate, - $line."Not allowed to modify student"); + $line."". + &mt('Not allowed to modify student').""); next; } my %aggregate = (); @@ -3553,7 +3554,9 @@ sub editgrades { # my $numcols=(scalar(@partid)*(scalar(@parts)-1)*2)+3; my $numcols=scalar(@partid)*4+2; $result .= &Apache::loncommon::start_data_table_row('LC_empty_row'). - 'No Changes Occurred For the Students Below'. + ''. + &mt('No Changes Occurred For the Students Below'). + ''. &Apache::loncommon::end_data_table_row(); foreach my $line (@noupdate) { $result.= @@ -3564,9 +3567,11 @@ sub editgrades { } $result .= &Apache::loncommon::end_data_table(). &show_grading_menu_form($symb); - my $msg = '

Number of records updated = '.$rec_update. - ' for '.$count.' student'.($count <= 1 ? '' : 's').'.
'. - 'Total number of students = '.$env{'form.total'}.'

'; + my $msg = '

'. + &mt('Number of records updated = [_1] for [quant,_2,student].', + $rec_update,$count).'
'. + ''.&mt('Total number of students = [_1]',$env{'form.total'}). + '

'; return $title.$msg.$result; } @@ -7226,7 +7231,7 @@ sub show_grading_menu_form { ''."\n". ''."\n". ''."\n". - ''."\n". + ''."\n". ''."\n"; return $result; }