diff options
| author |   Wolfram Schneider <wosch@FreeBSD.org> | 1996-08-13 21:50:51 +0000 |
|---|---|---|
| committer | Wolfram Schneider <wosch@FreeBSD.org> | 1996-08-13 21:50:51 +0000 |
| commit | 08ecda1dffa90503b011be078efe6f7f19c6bdcd (patch) | |
| tree | 412dd7dd0a68a3b280324dd18f69d567a2383adc /adduser | |
| parent | 73ca041dfcdee40aae69e5de3412a1148126ec4e (diff) | |
| download | pw-darwin-08ecda1dffa90503b011be078efe6f7f19c6bdcd.tar.gz pw-darwin-08ecda1dffa90503b011be078efe6f7f19c6bdcd.tar.zst pw-darwin-08ecda1dffa90503b011be078efe6f7f19c6bdcd.zip | |
Do not send "welcome mail" as default. If you want this feature
you can still enable it. Better, use mail client like elm or pine.
Requested by: Jordan
Diffstat (limited to 'adduser')
| -rw-r--r-- | adduser/adduser.perl | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/adduser/adduser.perl b/adduser/adduser.perl index f13b69c..fe67396 100644 --- a/adduser/adduser.perl +++ b/adduser/adduser.perl @@ -32,7 +32,7 @@ # # Email: Wolfram Schneider <wosch@cs.tu-berlin.de> # -# $Id: adduser.perl,v 1.10 1996/02/10 17:15:47 wosch Exp $ +# $Id: adduser.perl,v 1.11 1996/05/06 06:15:19 gclarkii Exp $ # # read variables @@ -41,8 +41,8 @@ sub variables { $defaultpasswd = "yes"; # use password for new users $dotdir = "/usr/share/skel"; # copy dotfiles from this dir $dotdir_bak = $dotdir; - $send_message = "/etc/adduser.message"; # send message to new user - $send_message_bak = $send_message; + $send_message = "no"; # send message to new user + $send_message_bak = '/etc/adduser.message'; $config = "/etc/adduser.conf"; # config file for adduser $config_read = 1; # read config file $logfile = "/var/log/adduser"; # logfile @@ -905,7 +905,11 @@ sub filetest { # create configuration files and exit sub create_conf { $create_conf = 1; - &message_create($send_message); + if ($send_message ne 'no') { + &message_create($send_message); + } else { + &message_create($send_message_bak); + } &config_write(1); exit(0); } |