loncom/homework/lonhomework.pm - diff

Return to lonhomework.pm CVS log

Up to [LON-CAPA] / loncom / homework

version 1.240, 2006/04/13 19:01:40	version 1.242, 2006/04/25 15:32:40
Line 234 sub check_slot_access {	Line 234 sub check_slot_access {
my ($status,$datemsg)=&check_access($id);	my ($status,$datemsg)=&check_access($id);

my $useslots = &Apache::lonnet::EXT("resource.$id.useslots");	my $useslots = &Apache::lonnet::EXT("resource.$id.useslots");
if ($useslots ne 'resource') {	if ($useslots ne 'resource' && $useslots ne 'sequence') {
return ($status,$datemsg);	return ($status,$datemsg);
}	}

Line 266 sub check_slot_access {	Line 266 sub check_slot_access {
my $slotstatus='NOT_IN_A_SLOT';	my $slotstatus='NOT_IN_A_SLOT';
my ($returned_slot,$slot_name);	my ($returned_slot,$slot_name);
foreach my $slot (@slots) {	foreach my $slot (@slots) {
	$slot =~ s/(^\s\|\s$)//g;
&Apache::lonxml::debug("getting $slot");	&Apache::lonxml::debug("getting $slot");
my %slot=&Apache::lonnet::get_slot($slot);	my %slot=&Apache::lonnet::get_slot($slot);
&Apache::lonhomework::showhash(%slot);	&Apache::lonhomework::showhash(%slot);