loncom/interface/lonnavmaps.pm - diff

Return to lonnavmaps.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.471, 2011/12/04 16:27:06	version 1.472, 2011/12/18 17:15:03
Line 5118 sub check_for_slot {	Line 5118 sub check_for_slot {
my $ip = $slots{$slot_name}->{'ip'};	my $ip = $slots{$slot_name}->{'ip'};
if ($self->simpleStatus() == OPEN) {	if ($self->simpleStatus() == OPEN) {
my $startreserve = $slots{$slot_name}->{'startreserve'};	my $startreserve = $slots{$slot_name}->{'startreserve'};
	my $endreserve = $slots{$slot_name}->{'endreserve'};
my @proctors;	my @proctors;
if ($slots{$slot_name}->{'proctor'} ne '') {	if ($slots{$slot_name}->{'proctor'} ne '') {
@proctors = split(',',$slots{$slot_name}->{'proctor'});	@proctors = split(',',$slots{$slot_name}->{'proctor'});
Line 5143 sub check_for_slot {	Line 5144 sub check_for_slot {
}	}
} else {	} else {
if ($start > $now) {	if ($start > $now) {
return (RESERVABLE,$startreserve,$slot_name);	if (!$endreserve \|\| $endreserve > $now) {
	return (RESERVABLE,$startreserve,$slot_name);
	}
}	}
}	}
}	}