Index: openacs-4/packages/acs-kernel/sql/oracle/acs-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-kernel/sql/oracle/acs-create.sql,v
diff -u -r1.7 -r1.8
--- openacs-4/packages/acs-kernel/sql/oracle/acs-create.sql	22 Aug 2003 15:05:20 -0000	1.7
+++ openacs-4/packages/acs-kernel/sql/oracle/acs-create.sql	28 Aug 2003 09:41:38 -0000	1.8
@@ -237,11 +237,12 @@
 
   -- Make the "Unregistered Visitor" be object 0, which corresponds
   -- with the user_id assigned throughout the toolkit Tcl code
+  -- LARS: Make object_id 0 be a user, not a person
 
   insert into acs_objects
     (object_id, object_type)
   values
-    (0, 'person');
+    (0, 'user');
 
   insert into parties
     (party_id)
@@ -253,6 +254,11 @@
   values
     (0, 'Unregistered', 'Visitor');
 
+  insert into users
+    (user_id, username)
+  values
+    (0, 'guest');
+
   insert into acs_magic_objects
     (name, object_id)
   values
@@ -261,7 +267,8 @@
   -- Create the public group
   foo := acs_group.new (
     group_id => -1,
-    group_name => 'The Public'
+    group_name => 'The Public',
+    join_policy => 'closed'
   );
 
   insert into acs_magic_objects
@@ -282,7 +289,8 @@
 
   foo := acs_group.new (
     group_id => -2,
-    group_name => 'Registered Users'
+    group_name => 'Registered Users',
+    join_policy => 'closed'
   );
 
  insert into acs_magic_objects
