loncom/homework/bridgetask.pm - diff

Return to bridgetask.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.54, 2005/09/29 19:15:47	version 1.55, 2005/09/29 19:18:37
Line 568 sub end_Task {	Line 568 sub end_Task {
my $bt_status=$Apache::lonhomework::history{"resource.$version.status"};	my $bt_status=$Apache::lonhomework::history{"resource.$version.status"};
my $title=&Apache::lonnet::gettitle();	my $title=&Apache::lonnet::gettitle();
my %slot=&Apache::lonnet::get_slot($Apache::inputtags::slot_name);	my %slot=&Apache::lonnet::get_slot($Apache::inputtags::slot_name);
my $description=&Apache::slotrequest::get_description($Apache::inputtags::slot_name,\%slot);	my $start_time=
	&Apache::lonlocal::locallocaltime($slot{'starttime'});

my $status;	my $status;
$status.="\n<div class='$bt_status'>\n";	$status.="\n<div class='$bt_status'>\n";

if ($bt_status eq 'pass') {	if ($bt_status eq 'pass') {
$status.='<h2>You passed the '.$title.' given on '.	$status.='<h2>You passed the '.$title.' given on '.
$description.'.</h2>';	$start_time.'.</h2>';
}	}
if ($bt_status eq 'fail') {	if ($bt_status eq 'fail') {
$status.='<h2>You did not pass the '.$title.' given on '.	$status.='<h2>You did not pass the '.$title.' given on '.
$description.'.</h2>';	$start_time.'.</h2>';
if (!$previous) {	if (!$previous) {
$status.=&add_request_another_attempt_button();	$status.=&add_request_another_attempt_button();
}	}