Index: openacs-4/packages/acs-content-repository/sql/oracle/content-item.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/oracle/content-item.sql,v diff -u -r1.9 -r1.10 --- openacs-4/packages/acs-content-repository/sql/oracle/content-item.sql 12 May 2002 20:57:01 -0000 1.9 +++ openacs-4/packages/acs-content-repository/sql/oracle/content-item.sql 25 May 2002 14:30:02 -0000 1.10 @@ -1680,28 +1680,6 @@ return null; end get_parent_folder; -procedure update_last_modified ( - item_id in cr_items.item_id%TYPE, - last_modified in acs_objects.last_modified%TYPE default sysdate -) -is - v_parent_id cr_items.parent_id%TYPE; -begin - update acs_objects - set acs_objects.last_modified = content_item.update_last_modified.last_modified - where acs_objects.object_id = content_item.update_last_modified.item_id; - - select cr_items.parent_id - into v_parent_id - from cr_items - where cr_items.item_id = content_item.update_last_modified.item_id; - - content_item.update_last_modified(v_parent_id, content_item.update_last_modified.last_modified); - - exception when NO_DATA_FOUND then - null; -end update_last_modified; - end content_item; / show errors Index: openacs-4/packages/acs-content-repository/sql/oracle/packages-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/oracle/packages-create.sql,v diff -u -r1.6 -r1.7 --- openacs-4/packages/acs-content-repository/sql/oracle/packages-create.sql 12 May 2002 20:57:02 -0000 1.6 +++ openacs-4/packages/acs-content-repository/sql/oracle/packages-create.sql 25 May 2002 14:30:02 -0000 1.7 @@ -798,11 +798,6 @@ item_id in cr_items.item_id%TYPE ) return cr_folders.folder_id%TYPE; -procedure update_last_modified ( - item_id in cr_items.item_id%TYPE, - last_modified in acs_objects.last_modified%TYPE default sysdate -); - end content_item; / show errors Index: openacs-4/packages/acs-content-repository/sql/postgresql/content-item.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/postgresql/content-item.sql,v diff -u -r1.38 -r1.39 --- openacs-4/packages/acs-content-repository/sql/postgresql/content-item.sql 4 Apr 2002 03:00:11 -0000 1.38 +++ openacs-4/packages/acs-content-repository/sql/postgresql/content-item.sql 25 May 2002 14:30:02 -0000 1.39 @@ -2217,33 +2217,6 @@ end;' language 'plpgsql'; --- procedure update_last_modified -create function content_item__update_last_modified (integer, timestamp) -returns integer as ' -declare - update_last_modified__item_id alias for $1; - update_last_modified__last_modified alias for $2; - v_parent_id cr_items.parent_id%TYPE; - v_last_modified acs_objects.last_modified%TYPE default now(); -begin - if update_last_modified__last_modified is not null then - v_last_modified = update_last_modified__last_modified; - end if; - - update acs_objects - set acs_objects.last_modified = v_last_modified - where acs_objects.object_id = update_last_modified__item_id; - - select cr_items.parent_id - into v_parent_id - from cr_items - where cr_items.item_id = update_last_modified__item_id; - - content_item__update_last_modified(v_parent_id, v_last_modified); - - return 0; -end;' language 'plpgsql'; - -- show errors Index: openacs-4/packages/acs-content-repository/sql/postgresql/packages-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/postgresql/packages-create.sql,v diff -u -r1.3 -r1.4 --- openacs-4/packages/acs-content-repository/sql/postgresql/packages-create.sql 4 Apr 2002 03:00:11 -0000 1.3 +++ openacs-4/packages/acs-content-repository/sql/postgresql/packages-create.sql 25 May 2002 14:30:02 -0000 1.4 @@ -795,11 +795,6 @@ -- item_id in cr_items.item_id%TYPE -- ) return cr_folders.folder_id%TYPE; -- --- procedure update_last_modified ( --- item_id in cr_items.item_id%TYPE, --- last_modified in acs_objects.last_modified%TYPE default sysdate --- ); --- -- end content_item; -- show errors