loncom/homework/inputtags.pm - diff

Return to inputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.108, 2003/07/15 21:12:01	version 1.110, 2003/07/17 20:05:59
Line 346 sub decideoutput {	Line 346 sub decideoutput {
unless ($ENV{'course.'.	unless ($ENV{'course.'.
$ENV{'request.course.id'}.	$ENV{'request.course.id'}.
'.disable_receipt_display'} eq 'yes') {	'.disable_receipt_display'} eq 'yes') {
$message.='<br />Your receipt is '.&Apache::lonnet::receipt;	$message.=(($target eq 'web')?'<br />':' ').
	'Your receipt is '.&Apache::lonnet::receipt().
	(($target eq 'web')?&Apache::loncommon::help_open_topic('Receipt'):'');
}	}
}	}
$bgcolor=$possiblecolors{'correct'};	$bgcolor=$possiblecolors{'correct'};
Line 367 sub decideoutput {	Line 369 sub decideoutput {
unless ($ENV{'course.'.	unless ($ENV{'course.'.
$ENV{'request.course.id'}.	$ENV{'request.course.id'}.
'.disable_receipt_display'} eq 'yes') {	'.disable_receipt_display'} eq 'yes') {
$message.='<br />Your receipt is '.&Apache::lonnet::receipt;	$message.=(($target eq 'web')?'<br />':' ').
	'Your receipt is '.&Apache::lonnet::receipt().
	(($target eq 'web')?&Apache::loncommon::help_open_topic('Receipt'):'');
}	}
$bgcolor=$possiblecolors{'correct'};	$bgcolor=$possiblecolors{'correct'};
$button=0;	$button=0;