loncom/lond - diff - 1.178.2.15

Return to lond CVS log

Up to [LON-CAPA] / loncom

version 1.178.2.14, 2004/04/07 09:39:18	version 1.178.2.15, 2004/04/13 09:41:57
Line 796 sub ChangePasswordHandler {	Line 796 sub ChangePasswordHandler {
# First require that the user can be authenticated with their	# First require that the user can be authenticated with their
# old password:	# old password:

my $validated = ValidUser($udom, $uname, $upass);	my $validated = ValidateUser($udom, $uname, $upass);
if($validated) {	if($validated) {
my $realpasswd = GetAuthType($udom, $uname); # Defined since authd.	my $realpasswd = GetAuthType($udom, $uname); # Defined since authd.

Line 4494 sub make_passwd_file {	Line 4494 sub make_passwd_file {
#	#
my $uid = getpwnam($uname);	my $uid = getpwnam($uname);
if((defined $uid) && ($uid == 0)) {	if((defined $uid) && ($uid == 0)) {
	&logthis(">>>Attempted add of privileged account blocked<<<");
return "no_priv_account_error\n";	return "no_priv_account_error\n";
}	}