Diff for /loncom/homework/lonhomework.pm between versions 1.165 and 1.167

version 1.165, 2004/02/16 17:20:39 version 1.167, 2004/02/16 19:19:31
Line 201  sub check_access { Line 201  sub check_access {
     my $passed;      my $passed;
   
     if ($ENV{'request.state'} eq "construct") {      if ($ENV{'request.state'} eq "construct") {
  if (defined($ENV{'form.problemstatus'})) {   if ($ENV{'form.problemstate'}) {
     if ($ENV{'form.problemstate'} =~ /^CANNOT_ANSWER/) {      if ($ENV{'form.problemstate'} =~ /^CANNOT_ANSWER/) {
  return ('CANNOT_ANSWER','is in this state by royal decree.');   if ( ! ($ENV{'form.problemstate'} eq 'CANNOT_ANSWER_correct' &&
    lc($Apache::lonhomework::problemstatus) eq 'no')) {
       return ('CANNOT_ANSWER','is in this state by royal decree.');
    }
     } else {      } else {
  return ($ENV{'form.problemstate'},   return ($ENV{'form.problemstate'},
  'is in this state by royal decree.');   'is in this state by royal decree.');

Removed from v.1.165  
changed lines
  Added in v.1.167


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