Index: openacs-4/packages/edit-this-page/tcl/etp-procs-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/edit-this-page/tcl/etp-procs-postgresql.xql,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/edit-this-page/tcl/etp-procs-postgresql.xql	4 Apr 2003 15:20:28 -0000	1.10
+++ openacs-4/packages/edit-this-page/tcl/etp-procs-postgresql.xql	23 Sep 2003 19:13:20 -0000	1.11
@@ -48,6 +48,7 @@
 <fullquery name="etp::make_page.page_create">      
 <querytext>
 	select etp__create_page(
+	  :item_id,
 	  :package_id,
 	  :name,
           :title,
@@ -74,7 +75,7 @@
 
 <fullquery name="etp::get_pa.get_page_attributes">      
 <querytext>
-	select i.item_id, i.name, r.revision_id, r.title, 
+	select i.item_id, i.name, r.revision_id, r.title, r.mime_type,
 	       r.description, r.publish_date, r.content $extended_attributes
 	  from cr_items i, cr_revisions r
 	 where i.parent_id = etp__get_folder_id(:package_id)
@@ -86,7 +87,7 @@
  
 <fullquery name="etp::get_pa.get_page_attributes_other_revision">      
 <querytext>
-	select i.item_id, i.name, r.revision_id, r.title, 
+	select i.item_id, i.name, r.revision_id, r.title, r.mime_type,
 	       r.description, r.publish_date, r.content $extended_attributes
 	  from cr_items i, cr_revisions r
 	 where i.parent_id = etp__get_folder_id(:package_id)
@@ -166,4 +167,10 @@
    </querytext>
 </partialquery>
 
+<fullquery name="etp::get_folder_id.get_folder_id">
+	<querytext>
+	select etp__get_folder_id(:package_id)
+	</querytext>
+</fullquery>
+
 </queryset>