From: lpsolit%gmail.com <> Date: Wed, 30 Nov 2005 20:40:13 +0000 (+0000) Subject: Bug 317489: Email preferences are not set for the new admin user - Patch by Frédéric... X-Git-Tag: bugzilla-2.22rc1~119 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=b1812f951b2aa635d2dd8fb264e32815878ced95;p=thirdparty%2Fbugzilla.git Bug 317489: Email preferences are not set for the new admin user - Patch by Frédéric Buclin r=mkanat a=justdave --- diff --git a/checksetup.pl b/checksetup.pl index 8fe44d4cd4..5d901b646b 100755 --- a/checksetup.pl +++ b/checksetup.pl @@ -1442,7 +1442,10 @@ require Bugzilla::User::Setting; import Bugzilla::User::Setting qw(add_setting); require Bugzilla::Util; -import Bugzilla::Util qw(bz_crypt trim html_quote); +import Bugzilla::Util qw(bz_crypt trim html_quote is_7bit_clean); + +require Bugzilla::User; +import Bugzilla::User qw(insert_new_user); # globals.pl clears the PATH, but File::Find uses Cwd::cwd() instead of # Cwd::getcwd(), which we need to do because `pwd` isn't in the path - see @@ -4407,10 +4410,6 @@ if ($sth->rows == 0) { } if ($admin_create) { - - require Bugzilla::Util; - import Bugzilla::Util 'is_7bit_clean'; - while( $realname eq "" ) { print "Enter the real name of the administrator: "; $realname = $answer{'ADMIN_REALNAME'} @@ -4466,9 +4465,6 @@ if ($sth->rows == 0) { } } - # Crypt the administrator's password - my $cryptedpassword = bz_crypt($pass1); - if ($^O !~ /MSWin32/i) { system("stty","echo"); # re-enable input echoing } @@ -4478,12 +4474,7 @@ if ($sth->rows == 0) { $SIG{QUIT} = 'DEFAULT'; $SIG{TERM} = 'DEFAULT'; - $dbh->do( - q{INSERT INTO profiles (login_name, realname, cryptpassword, - disabledtext, refreshed_when) - VALUES (?, ?, ?, ?, ?)}, - undef, $login, $realname, $cryptedpassword, - '', '1900-01-01 00:00:00'); + insert_new_user($login, $realname, $pass1); } # Put the admin in each group if not already