loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.391, 2007/12/25 04:01:57	version 1.392, 2008/01/03 20:42:28
Line 4455 sub validate_class_access_handler {	Line 4455 sub validate_class_access_handler {
my ($cmd, $tail, $client) = @_;	my ($cmd, $tail, $client) = @_;
my $userinput = "$cmd:$tail";	my $userinput = "$cmd:$tail";
my ($inst_class,$ownerlist,$cdom) = split(/:/, $tail);	my ($inst_class,$ownerlist,$cdom) = split(/:/, $tail);
my @owners = split(/,/,&unescape($ownerlist));	my $owners = &unescape($ownerlist);
my $outcome;	my $outcome;
eval {	eval {
local($SIG{__DIE__})='DEFAULT';	local($SIG{__DIE__})='DEFAULT';
$outcome=&localenroll::check_section($inst_class,\@owners,$cdom);	$outcome=&localenroll::check_section($inst_class,$owners,$cdom);
};	};
&Reply($client,\$outcome, $userinput);	&Reply($client,\$outcome, $userinput);