Index: openacs-4/packages/wp-slim/sql/oracle/wp-slim-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/sql/oracle/wp-slim-create.sql,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/wp-slim/sql/oracle/wp-slim-create.sql 15 Nov 2001 01:47:13 -0000 1.2 +++ openacs-4/packages/wp-slim/sql/oracle/wp-slim-create.sql 23 Feb 2002 21:21:07 -0000 1.3 @@ -595,7 +595,8 @@ public_p in cr_wp_presentations.public_p%TYPE default 'f', show_modified_p in cr_wp_presentations.show_modified_p%TYPE default 'f', audience in varchar2, - background in varchar2 + background in varchar2, + parent_id in integer ) return cr_items.item_id%TYPE; procedure delete_audience ( @@ -762,7 +763,8 @@ public_p in cr_wp_presentations.public_p%TYPE, show_modified_p in cr_wp_presentations.show_modified_p%TYPE default 'f', audience in varchar2, - background in varchar2 + background in varchar2, + parent_id in integer ) return cr_items.item_id%TYPE is v_item_id cr_items.item_id%TYPE; @@ -789,7 +791,8 @@ content_type => 'cr_wp_presentation', creation_date => creation_date, creation_user => creation_user, - creation_ip => creation_ip + creation_ip => creation_ip, + parent_id => parent_id ); v_revision_id := content_revision.new( Index: openacs-4/packages/wp-slim/sql/postgresql/wp-slim-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/sql/postgresql/wp-slim-create.sql,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/wp-slim/sql/postgresql/wp-slim-create.sql 15 Nov 2001 01:47:13 -0000 1.2 +++ openacs-4/packages/wp-slim/sql/postgresql/wp-slim-create.sql 23 Feb 2002 21:21:07 -0000 1.3 @@ -726,7 +726,8 @@ boolean, boolean, varchar, - varchar + varchar, + integer ) returns integer as' declare @@ -741,7 +742,8 @@ p_show_modified_p alias for $9; aud alias for $10; back alias for $11; - v_item_id cr_items.item_id%TYPE; + p_parent_id alias for $12; + v_item_id cr_items.item_id%TYPE; v_audience_item_id cr_items.item_id%TYPE; v_background_item_id cr_items.item_id%TYPE; v_revision_id cr_revisions.revision_id%TYPE; @@ -759,9 +761,9 @@ v_item_id := content_item__new( v_name, + p_parent_id, null, null, - null, p_creation_date, p_creation_user, null, Index: openacs-4/packages/wp-slim/www/create-presentation-2-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/www/Attic/create-presentation-2-oracle.xql,v diff -u -N -r1.1 -r1.2 --- openacs-4/packages/wp-slim/www/create-presentation-2-oracle.xql 4 Oct 2001 04:23:13 -0000 1.1 +++ openacs-4/packages/wp-slim/www/create-presentation-2-oracle.xql 23 Feb 2002 21:21:07 -0000 1.2 @@ -18,7 +18,8 @@ public_p => :public_p, show_modified_p => :show_modified_p, audience => :audience, - background => :background + background => :background, + parent_id => :package_id ); end; Index: openacs-4/packages/wp-slim/www/create-presentation-2-postgresql.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/www/Attic/create-presentation-2-postgresql.xql,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/wp-slim/www/create-presentation-2-postgresql.xql 15 Nov 2001 01:47:13 -0000 1.2 +++ openacs-4/packages/wp-slim/www/create-presentation-2-postgresql.xql 23 Feb 2002 21:21:07 -0000 1.3 @@ -17,7 +17,8 @@ :public_p, :show_modified_p, :audience, - :background + :background, + :package_id ); Index: openacs-4/packages/wp-slim/www/serve-slide-revision-oracle.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/wp-slim/www/serve-slide-revision-oracle.xql,v diff -u -N -r1.2 -r1.3 --- openacs-4/packages/wp-slim/www/serve-slide-revision-oracle.xql 15 Nov 2001 01:47:13 -0000 1.2 +++ openacs-4/packages/wp-slim/www/serve-slide-revision-oracle.xql 23 Feb 2002 21:21:07 -0000 1.3 @@ -25,7 +25,7 @@ select i.live_revision as attach_id, a.display, i.name as file_name - from cr_items i, cd_wp_image_attachments a + from cr_items i, cr_wp_image_attachments a where i.parent_id = :slide_item_id and i.content_type in ('cr_wp_image_attachment', 'cr_wp_file_attachment') and i.live_revision = a.attach_id(+)