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

Diff for /loncom/homework/lonhomework.pm between versions 1.317 and 1.317.4.3

version 1.317, 2010/01/30 22:40:37 version 1.317.4.3, 2011/01/06 22:38:11
Line 47  use Apache::externalresponse(); Line 47  use Apache::externalresponse();
 use Apache::rankresponse();  use Apache::rankresponse();
 use Apache::matchresponse();  use Apache::matchresponse();
 use Apache::chemresponse();  use Apache::chemresponse();
   use Apache::functionplotresponse();
 use Apache::drawimage();  use Apache::drawimage();
 use Apache::Constants qw(:common);  use Apache::Constants qw(:common);
 use Apache::loncommon();  use Apache::loncommon();
Line 111  sub get_target { Line 112  sub get_target {
  } elsif ( $env{'form.grade_target'} eq 'webgrade'   } elsif ( $env{'form.grade_target'} eq 'webgrade'
   && ($Apache::lonhomework::queuegrade eq 'F' )) {    && ($Apache::lonhomework::queuegrade eq 'F' )) {
     return ($env{'form.grade_target'});      return ($env{'form.grade_target'});
  }          } elsif ($env{'form.grade_target'} eq 'answer') {
               if ($env{'form.answer_output_mode'} eq 'tex') {
                   return ($env{'form.grade_target'});
               }
           }
  if ($env{'form.webgrade'} &&   if ($env{'form.webgrade'} &&
     ($Apache::lonhomework::modifygrades eq 'F'      ($Apache::lonhomework::modifygrades eq 'F'
      || $Apache::lonhomework::queuegrade eq 'F' )) {       || $Apache::lonhomework::queuegrade eq 'F' )) {
Line 265  sub check_slot_access { Line 270  sub check_slot_access {
     }      }
     if ($slotstatus eq 'NEEDS_CHECKIN' &&      if ($slotstatus eq 'NEEDS_CHECKIN' &&
  &proctor_checked_in($slot_name,$returned_slot,$type)) {   &proctor_checked_in($slot_name,$returned_slot,$type)) {
  &Apache::lonxml::debug("protoctor checked in");   &Apache::lonxml::debug("proctor checked in");
  $slotstatus='CAN_ANSWER';   $slotstatus=$status;
     }      }
   
     my ($is_correct,$got_grade,$checkedin);      my ($is_correct,$got_grade,$checkedin);
Removed from v.1.317  
changed lines
  Added in v.1.317.4.3

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