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.6 -r1.7
--- openacs-4/packages/acs-bootstrap-installer/installer/create-administrator-2.tcl	22 Aug 2003 15:09:36 -0000	1.6
+++ openacs-4/packages/acs-bootstrap-installer/installer/create-administrator-2.tcl	25 Aug 2003 11:55:40 -0000	1.7
@@ -7,13 +7,16 @@
 
 } {
     email:notnull
-    username:notnull
+    {username ""}
     first_names:notnull
     last_name:notnull
     password:notnull
     password_confirmation:notnull
 }
 
+if { [empty_string_p $username] } {
+    set username $email
+}
 
 if { [string compare $password $password_confirmation] } {
     install_return 200 "Passwords Don't Match" "