loncom/lcuserdel - diff

Return to lcuserdel CVS log

Up to [LON-CAPA] / loncom

version 1.11, 2000/10/30 03:08:28	version 1.12, 2000/10/30 03:37:51
Line 114 if ($username ne $safeusername) {	Line 114 if ($username ne $safeusername) {
# Remove entry from /etc/passwd if it exists	# Remove entry from /etc/passwd if it exists
# Remove entry from /etc/groups if it exists	# Remove entry from /etc/groups if it exists
# I surround with groupdel command to make absolutely sure the group definition disappears.	# I surround with groupdel command to make absolutely sure the group definition disappears.
system('/usr/sbin/groupdel 2>/dev/null',$safeusername); # ignore error message	system('/usr/sbin/groupdel',$safeusername); # ignore error message
system('/usr/sbin/userdel 2>/dev/null',$safeusername); # ignore error message	system('/usr/sbin/userdel',$safeusername); # ignore error message
system('/usr/sbin/groupdel 2>/dev/null',$safeusername); # ignore error message	system('/usr/sbin/groupdel',$safeusername); # ignore error message

# Remove entry from /etc/smbpasswd if it exists	# Remove entry from /etc/smbpasswd if it exists
my $oldsmbpasswd=`/bin/cat /etc/smbpasswd`;	my $oldsmbpasswd=`/bin/cat /etc/smbpasswd`;