d/freebsd-skq
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Submitted by: Masafumi NAKANE <masafumi@tky007.tth.expo96.ad.jp>

Browse Source 
bugfix: chown home directory if don't copy dotfiles
This commit is contained in:
Wolfram Schneider 1996-02-10 17:15:47 +00:00
parent 537c20ded7
commit 5038dc1abd
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
usr.sbin/adduser/adduser.perl
View File

@ -32,7 +32,7 @@
#
# Email: Wolfram Schneider <wosch@cs.tu-berlin.de>
#
# $Id: adduser.perl,v 1.8 1995/10/19 06:26:49 jkh Exp $
# $Id: adduser.perl,v 1.9 1995/10/22 11:44:16 jkh Exp $
#
# read variables
@ -938,7 +938,13 @@ sub home_create {
return 0;
}
return mkdir("$homedir",0755) if $dotdir eq "no";
if ($dotdir eq 'no') {
if (!mkdir("$homedir",0755)) {
warn "mkdir $homedir: $!\n"; return 0;
}
system 'chown', "$name:$group", $homedir;
return !$?;
}
# copy files from $dotdir to $homedir
# rename 'dot.foo' files to '.foo'