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

Diff for /loncom/homework/structuretags.pm between versions 1.548 and 1.549

version 1.548, 2016/04/04 17:24:18 version 1.549, 2016/04/04 17:34:01
Line 1605  sub start_problem { Line 1605  sub start_problem {
         } elsif (($env{'request.state'} ne "construct") &&          } elsif (($env{'request.state'} ne "construct") &&
                  ($Apache::lonhomework::type eq 'randomizetry') &&                   ($Apache::lonhomework::type eq 'randomizetry') &&
                  ($status eq 'CAN_ANSWER') &&                   ($status eq 'CAN_ANSWER') &&
                  ($env{'course.'.$env{'request.course.id'}.'.type'} ne 'Placement')) {                   ($env{'course.'.$env{'request.course.id'}.'.type'} ne 'Placement') &&
 # "New Problem Variation Each Try" header suppressed for Placement Tests.                   (!$env{'request.role.adv'})) {
   # "New Problem Variation Each Try" header suppressed for Placement Tests, unless course personnel. 
             my $reqtries = &Apache::lonnet::EXT("resource.$Apache::inputtags::part.randomizeontries");              my $reqtries = &Apache::lonnet::EXT("resource.$Apache::inputtags::part.randomizeontries");
             my $problemstatus = &get_problem_status($Apache::inputtags::part);              my $problemstatus = &get_problem_status($Apache::inputtags::part);
             $form_tag_start.=&randomizetry_problem_header($problemstatus,$reqtries);              $form_tag_start.=&randomizetry_problem_header($problemstatus,$reqtries);
Line 1937  sub end_problem { Line 1938  sub end_problem {
                         if (ref($navmap)) {                          if (ref($navmap)) {
                             my $hastries = &Apache::lonplacementtest::has_tries($symb,$navmap);                                my $hastries = &Apache::lonplacementtest::has_tries($symb,$navmap);  
 # For Placement Tests test status is displayed if this is the last resource in the course  # For Placement Tests test status is displayed if this is the last resource in the course
 # and there are no tries left;  # and there are no tries left
                             unless ($hastries) {                              unless ($hastries) {
                                 if (&Apache::lonplacementtest::is_lastres($symb,$navmap)) {                                  if (&Apache::lonplacementtest::is_lastres($symb,$navmap)) {
                                     my ($score,$incomplete) =                                       my ($score,$incomplete) = 
Removed from v.1.548  
changed lines
  Added in v.1.549

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