loncom/homework/bridgetask.pm - diff

Return to bridgetask.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.153, 2006/05/23 19:55:40	version 1.154, 2006/05/25 19:37:47
Line 1394 sub pick_from_queue_data {	Line 1394 sub pick_from_queue_data {
}	}
my $end_time;	my $end_time;
if (my $slot=&slotted_access($queuedata->{$key})) {	if (my $slot=&slotted_access($queuedata->{$key})) {
	&Apache::lonxml::debug("looking at slot $slot");
my %slot_data=&Apache::lonnet::get_slot($slot);	my %slot_data=&Apache::lonnet::get_slot($slot);
if ($slot_data{'endtime'} < time) {	if ($slot_data{'endtime'} < time) {
$end_time = $slot_data{'endtime'};	$end_time = $slot_data{'endtime'};
	} else {
	&Apache::lonxml::debug("not time ".$slot_data{'endtime'});
	next;
}	}
} else {	} else {
my $due_date = &Apache::lonhomework::due_date('0',$symb);	my $due_date = &Apache::lonhomework::due_date('0',$symb);
if ($due_date > time) {	if ($due_date < time) {
$end_time = $due_date;	$end_time = $due_date;
	} else {
	&Apache::lonxml::debug("not time $due_date");
	next;
}	}
}	}
if ($end_time ne '') {
&Apache::lonxml::debug("not time");
next;
}

if (exists($queuedata->{"$key\0locked"})) {	if (exists($queuedata->{"$key\0locked"})) {
&Apache::lonxml::debug("someone already has um.");	&Apache::lonxml::debug("someone already has um.");