Diff for /loncom/homework/inputtags.pm between versions 1.234 and 1.235

version 1.234, 2007/11/01 20:56:51 version 1.235, 2007/11/17 02:03:46
Line 667  sub decideoutput { Line 667  sub decideoutput {
  $message.= $computer;   $message.= $computer;
     }      }
     $added_computer_text=1;      $added_computer_text=1;
     my ($symb) = &Apache::lonnet::whichuser();      if ($awarded > 0) {
     if (($symb ne '')    my ($symb) = &Apache::lonnet::whichuser();
  &&   if (($symb ne '') 
  ($env{'course.'.$env{'request.course.id'}.      &&
     '.disable_receipt_display'} ne 'yes')) {       ($env{'course.'.$env{'request.course.id'}.
  $message.=(($target eq 'web')?'<br />':' ').        '.disable_receipt_display'} ne 'yes')) { 
     &mt('Your receipt is').' '.&Apache::lonnet::receipt($Apache::inputtags::part).      $message.=(($target eq 'web')?'<br />':' ').
     (($target eq 'web')?&Apache::loncommon::help_open_topic('Receipt'):'');   &mt('Your receipt is [_1]',
       (&Apache::lonnet::receipt($Apache::inputtags::part).
        (($target eq 'web')?&Apache::loncommon::help_open_topic('Receipt'):'')));
    }
     }      }
  }   }
  $button=0;   $button=0;
Line 701  sub decideoutput { Line 704  sub decideoutput {
  $message.= $computer;   $message.= $computer;
     }      }
     $added_computer_text=1;      $added_computer_text=1;
     unless ($env{'course.'.      if  ($awarded > 0 
    && $env{'course.'.
      $env{'request.course.id'}.       $env{'request.course.id'}.
      '.disable_receipt_display'} eq 'yes') {        '.disable_receipt_display'} ne 'yes') { 
  $message.=(($target eq 'web')?'<br />':' ').   $message.=(($target eq 'web')?'<br />':' ').
     'Your receipt is '.&Apache::lonnet::receipt($Apache::inputtags::part).      &mt('Your receipt is [_1]',
     (($target eq 'web')?&Apache::loncommon::help_open_topic('Receipt'):'');   (&Apache::lonnet::receipt($Apache::inputtags::part).
    (($target eq 'web')?&Apache::loncommon::help_open_topic('Receipt'):'')));
     }      }
     $css_class=$possible_class{'correct'};      $css_class=$possible_class{'correct'};
     $button=0;      $button=0;

Removed from v.1.234  
changed lines
  Added in v.1.235


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