Index: openacs-4/packages/acs-bootstrap-installer/installer/create-administrator-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/installer/Attic/create-administrator-2.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/acs-bootstrap-installer/installer/create-administrator-2.tcl 30 Nov 2002 17:14:05 -0000 1.5 +++ openacs-4/packages/acs-bootstrap-installer/installer/create-administrator-2.tcl 22 Aug 2003 15:09:36 -0000 1.6 @@ -7,14 +7,14 @@ } { email:notnull + username:notnull first_names:notnull last_name:notnull password:notnull password_confirmation:notnull - password_question:notnull - password_answer:notnull } + if { [string compare $password $password_confirmation] } { install_return 200 "Passwords Don't Match" " The passwords you've entered don't match. Please try again. @@ -28,7 +28,18 @@ db_transaction { - set user_id [ad_user_new $email $first_names $last_name $password $password_question $password_answer] + set user_id [ad_user_new \ + $email \ + $first_names \ + $last_name \ + $password \ + "" \ + "" \ + "" \ + "t" \ + "approved" \ + "" \ + $username] if { !$user_id } { global errorInfo Index: openacs-4/packages/acs-bootstrap-installer/installer/create-administrator.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/installer/Attic/create-administrator.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/acs-bootstrap-installer/installer/create-administrator.tcl 12 Apr 2001 16:58:18 -0000 1.1 +++ openacs-4/packages/acs-bootstrap-installer/installer/create-administrator.tcl 22 Aug 2003 15:09:36 -0000 1.2 @@ -38,14 +38,18 @@ user in UNIX). Please type in the email address, first and last name, and password for this user. -
+
+ + + + @@ -61,21 +65,6 @@ - - - - - - - -
Email:
Username:
First Name:
Password (again):
Password Question:
(To be asked if you forget your password.) -
Password Answer:

\">