Index: openacs-4/packages/acs-bootstrap-installer/acs-bootstrap-installer.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/acs-bootstrap-installer.info,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-bootstrap-installer/acs-bootstrap-installer.info	15 Apr 2001 23:09:55 -0000	1.2
+++ openacs-4/packages/acs-bootstrap-installer/acs-bootstrap-installer.info	16 Apr 2001 05:20:10 -0000	1.3
@@ -39,6 +39,7 @@
             <file type="tcl_procs" path="tcl/20-db-bootstrap-procs.tcl"/>
             <file type="tcl_procs" path="tcl/30-apm-load-procs.tcl"/>
             <file type="query_file" db_type="postgresql" path="installer/create-administrator-postgresql.xql"/>
+            <file type="query_file" db_type="postgresql" path="installer/create-administrator-2-postgresql.xql"/>
         </files>
         <parameters>
         <!-- No version parameters -->
Index: openacs-4/packages/acs-bootstrap-installer/installer/create-administrator-2-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-bootstrap-installer/installer/Attic/create-administrator-2-postgresql.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/acs-bootstrap-installer/installer/create-administrator-2-postgresql.xql	16 Apr 2001 05:20:10 -0000	1.1
@@ -0,0 +1,11 @@
+<?xml version="1.0"?>
+<queryset>
+<rdbms><type>postgresql</type><version>7.1</version></rdbms>
+
+<fullquery name=".create-administrator-2.grant_admin">
+<querytext>
+select acs_permission__grant_permission(acs__magic_object_id('security_context_root'), :user_id, 'admin')
+</querytext>
+</fullquery>
+
+</queryset>
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.1 -r1.2
--- openacs-4/packages/acs-bootstrap-installer/installer/create-administrator-2.tcl	12 Apr 2001 16:58:18 -0000	1.1
+++ openacs-4/packages/acs-bootstrap-installer/installer/create-administrator-2.tcl	16 Apr 2001 05:20:10 -0000	1.2
@@ -44,7 +44,10 @@
         return
     }
 
-    db_dml grant_admin {
+    # Changed this from db_dml to db_exec_plsql (ben - OpenACS)
+    # why was this a DML? Thanks to Oracle-only, this didn't make a
+    # difference, but it broke our DB API. This new version is correct.
+    db_exec_plsql grant_admin {
       begin
         acs_permission.grant_permission (
           object_id => acs.magic_object_id('security_context_root'),
Index: openacs-4/packages/acs-tcl/acs-tcl.info
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/acs-tcl.info,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/acs-tcl/acs-tcl.info	12 Apr 2001 18:28:31 -0000	1.6
+++ openacs-4/packages/acs-tcl/acs-tcl.info	16 Apr 2001 05:20:10 -0000	1.7
@@ -42,9 +42,11 @@
             <file type="tcl_procs" path="tcl/apm-procs.tcl"/>
             <file type="tcl_procs" path="tcl/apm-xml-procs.tcl"/>
             <file type="tcl_procs" path="tcl/community-core-procs.tcl"/>
+            <file type="query_file" db_type="postgresql" path="tcl/community-core-procs-postgresql.xql"/>
             <file type="tcl_init" path="tcl/database-init.tcl"/>
             <file type="tcl_procs" path="tcl/db-query-dispatcher-procs.tcl"/>
             <file type="tcl_procs" path="tcl/defs-procs.tcl"/>
+            <file type="query_file" db_type="postgresql" path="tcl/defs-procs-postgresql.xql"/>
             <file type="tcl_procs" path="tcl/deprecated-utilities-procs.tcl"/>
             <file type="tcl_init" path="tcl/document-init.tcl"/>
             <file type="tcl_procs" path="tcl/document-procs.tcl"/>
Index: openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/acs-tcl/tcl/community-core-procs-postgresql.xql	16 Apr 2001 05:20:10 -0000	1.1
@@ -0,0 +1,27 @@
+<?xml version="1.0"?>
+<queryset>
+<rdbms><type>postgresql</type><version>7.1</version></rdbms>
+
+<fullquery name=".community-core-procs.ad_user_new.user_insert">
+<querytext>
+select acs__add_user(
+	:user_id,
+	'person',
+	now(),
+	NULL,
+	:peeraddr,
+	:email,
+	:url,
+	:first_names,
+	:last_name,
+	:hashed_password,
+	:salt,
+	:password_question,
+	:password_answer,
+	NULL,
+	:email_verified_p,
+	:member_state)
+</querytext>
+</fullquery>
+
+</queryset>
Index: openacs-4/packages/acs-tcl/tcl/defs-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/Attic/defs-procs-postgresql.xql,v
diff -u
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ openacs-4/packages/acs-tcl/tcl/defs-procs-postgresql.xql	16 Apr 2001 05:20:10 -0000	1.1
@@ -0,0 +1,14 @@
+<?xml version="1.0"?>
+<queryset>
+<rdbms><type>postgresql</type><version>7.1</version></rdbms>
+
+<fullquery name=".defs-procs.ad_parameter.ad_parameter_set">
+<querytext>
+select apm__set_value(
+	:package_id,
+	:name,
+	:set)
+</querytext>
+</fullquery>
+
+</queryset>