[BACK]Return to grades.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/grades.pm between versions 1.596.2.12.2.13 and 1.596.2.12.2.15

version 1.596.2.12.2.13, 2013/05/10 23:31:37 version 1.596.2.12.2.15, 2013/05/30 05:28:03
Line 7575  sub prompt_for_corrections { Line 7575  sub prompt_for_corrections {
             ($responsetype_per_response{$question-1} eq 'imageresponse') ||              ($responsetype_per_response{$question-1} eq 'imageresponse') ||
             ($responsetype_per_response{$question-1} eq 'reactionresponse') ||              ($responsetype_per_response{$question-1} eq 'reactionresponse') ||
             ($responsetype_per_response{$question-1} eq 'organicresponse')) {              ($responsetype_per_response{$question-1} eq 'organicresponse')) {
             $r->print(&mt("Although this particular question type requires handgrading, the instructions for this question in the exam directed students to leave [quant,_1,line] blank on their bubblesheets.",$lines).'<br /><br />'.&mt('A non-zero score can be assigned to the student during bubblesheet grading by selecting a bubble in at least one line.').'<br />'.&mt('The score for this question will be a sum of the numeric values for the selected bubbles from each line, where A=1 point, B=2 points etc.').'<br />'.&mt("To assign a score of zero for this question, mark all lines as 'No bubble'.").'<br /><br />');              $r->print(&mt("Although this particular question type requires handgrading, the instructions for this question in the bubblesheet exam directed students to leave [quant,_1,line] blank on their bubblesheets.",$lines).'<br /><br />'.&mt('A non-zero score can be assigned to the student during bubblesheet grading by selecting a bubble in at least one line.').'<br />'.&mt('The score for this question will be a sum of the numeric values for the selected bubbles from each line, where A=1 point, B=2 points etc.').'<br />'.&mt("To assign a score of zero for this question, mark all lines as 'No bubble'.").'<br /><br />');
         } else {          } else {
             $r->print(&mt("Select at most one bubble in a single line and select 'No Bubble' in all the other lines. ")."<br />");              $r->print(&mt("Select at most one bubble in a single line and select 'No Bubble' in all the other lines. ")."<br />");
         }          }
Line 8387  sub users_order  { Line 8387  sub users_order  {
         my $actual_seq =          my $actual_seq =
             &Apache::lonprintout::master_seq_to_person_seq($mapurl,              &Apache::lonprintout::master_seq_to_person_seq($mapurl,
                                                            $master_seq,                                                             $master_seq,
                                                            $user,$scancode);                                                             $user,$scancode,1);
         if (ref($actual_seq) eq 'ARRAY') {          if (ref($actual_seq) eq 'ARRAY') {
             @{$ordered->{$scancode}} =              @{$ordered->{$scancode}} =
                 map { $symb_to_resource->{$_}; } @{$actual_seq};                  map { $symb_to_resource->{$_}; } @{$actual_seq};
Line 8398  sub users_order  { Line 8398  sub users_order  {
         my $actual_seq =          my $actual_seq =
             &Apache::lonprintout::master_seq_to_person_seq($mapurl,              &Apache::lonprintout::master_seq_to_person_seq($mapurl,
                                                            $master_seq,                                                             $master_seq,
                                                            $user);                                                             $user,undef,1);
         if (ref($actual_seq) eq 'ARRAY') {          if (ref($actual_seq) eq 'ARRAY') {
             @mapresources =              @mapresources =
                 map { $symb_to_resource->{$_}; } @{$actual_seq};                  map { $symb_to_resource->{$_}; } @{$actual_seq};
Removed from v.1.596.2.12.2.13  
changed lines
  Added in v.1.596.2.12.2.15

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>