loncom/lond - diff

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.257, 2004/09/14 20:15:22	version 1.259, 2004/09/24 14:15:03
Line 2096 sub mkdir_user_file_handler {	Line 2096 sub mkdir_user_file_handler {
foreach my $part (@parts) {	foreach my $part (@parts) {
$path .= '/'.$part;	$path .= '/'.$part;
if (!-e $path) {	if (!-e $path) {
&logthis("Making $path");
mkdir($path,0770);	mkdir($path,0770);
}	}
}	}
Line 5041 sub get_auth_type	Line 5040 sub get_auth_type
Debug("Password info = $realpassword\n");	Debug("Password info = $realpassword\n");
my ($authtype, $contentpwd) = split(/:/, $realpassword);	my ($authtype, $contentpwd) = split(/:/, $realpassword);
Debug("Authtype = $authtype, content = $contentpwd\n");	Debug("Authtype = $authtype, content = $contentpwd\n");
my $availinfo = '';	return "$authtype:$contentpwd";
if($authtype eq 'krb4' or $authtype eq 'krb5') {
$availinfo = $contentpwd;
}

return "$authtype:$availinfo";
} else {	} else {
Debug("Returning nouser");	Debug("Returning nouser");
return "nouser";	return "nouser";