loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.340, 2006/08/29 21:08:08	version 1.342, 2006/09/05 15:35:14
Line 3454 sub dump_course_id_handler {	Line 3454 sub dump_course_id_handler {
}	}
unless ($typefilter eq '.' \|\| !defined($typefilter)) {	unless ($typefilter eq '.' \|\| !defined($typefilter)) {
my $unescapeType = &unescape($type);	my $unescapeType = &unescape($type);
if (!defined($type)) {	if ($type eq '') {
if ($typefilter ne 'Course') {	if ($typefilter ne 'Course') {
$match = 0;	$match = 0;
}	}
Line 4200 sub validate_class_access_handler {	Line 4200 sub validate_class_access_handler {
my $userinput = "$cmd:$tail";	my $userinput = "$cmd:$tail";
my ($inst_class,$courseowner,$cdom) = split(/:/, $tail);	my ($inst_class,$courseowner,$cdom) = split(/:/, $tail);
$courseowner = &unescape($courseowner);	$courseowner = &unescape($courseowner);
my $outcome=&localenroll::check_section($inst_class,$courseowner,$cdom);	my $outcome;
	eval {
	local($SIG{__DIE__})='DEFAULT';
	$outcome=&localenroll::check_section($inst_class,$courseowner,$cdom);
	};
&Reply($client,"$outcome\n", $userinput);	&Reply($client,"$outcome\n", $userinput);

return 1;	return 1;