Diff for /loncom/lcuserdel between versions 1.12 and 1.14

version 1.12, 2000/10/30 03:37:51 version 1.14, 2002/10/07 01:52:28
Line 119  system('/usr/sbin/userdel',$safeusername Line 119  system('/usr/sbin/userdel',$safeusername
 system('/usr/sbin/groupdel',$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`;  #  the safest way to do this is with smbpasswd -x
 my $newsmbpasswd=`/bin/grep -v '^${safeusername}:' /etc/smbpasswd`;  #  as that's independent of location of the smbpasswd file.
   #
 if ($oldsmbpasswd ne $newsmbpasswd) {  if (-e '/usr/bin/smbpasswd') {
     open OUT,">/etc/smbpasswd";    ($>,$<) = (0,0); # fool smbpasswd to think this is not setuid.
     print OUT $newsmbpasswd;    system('/usr/bin/smbpasswd -x '.$safeusername);
     close OUT;    $< = $wwwid;
 }  }
   
   
 # Change ownership on directory from username:username to www:www  # Change ownership on directory from username:username to www:www
 # This prevents subsequently added users from having access.  # This prevents subsequently added users from having access.
   

Removed from v.1.12  
changed lines
  Added in v.1.14


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>