Return to lcuserdel CVS log | Up to [LON-CAPA] / loncom |
version 1.13, 2002/10/07 01:41:31 | version 1.14, 2002/10/07 01:52:28 |
---|---|
Line 125 system('/usr/sbin/groupdel',$safeusernam | Line 125 system('/usr/sbin/groupdel',$safeusernam |
if (-e '/usr/bin/smbpasswd') { | if (-e '/usr/bin/smbpasswd') { |
($>,$<) = (0,0); # fool smbpasswd to think this is not setuid. | ($>,$<) = (0,0); # fool smbpasswd to think this is not setuid. |
system('/usr/bin/smbpasswd -x '.$safeusername); | system('/usr/bin/smbpasswd -x '.$safeusername); |
$< = $wwwid; | |
} | } |