Index: openacs-4/packages/categories/sql/oracle/categories-init.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/sql/oracle/categories-init.sql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/categories/sql/oracle/categories-init.sql	23 Apr 2003 12:29:27 -0000	1.1
+++ openacs-4/packages/categories/sql/oracle/categories-init.sql	9 May 2003 06:08:04 -0000	1.2
@@ -44,13 +44,18 @@
 
 create table acs_named_objects (
 	object_id	integer not null
-			constraint acs_named_objs_pk primary key
 			constraint acs_named_objs_object_id_fk
 			references acs_objects(object_id) on delete cascade,
+	locale		varchar2(5)
+			constraint acs_named_objs_locale_fk
+			references ad_locales,
 	object_name	varchar2(200),
+	creation_date	date default sysdate not null,
 	package_id	integer
 			constraint acs_named_objs_package_id_fk
-			references apm_packages(package_id) on delete cascade
+			references apm_packages(package_id) on delete cascade,
+	constraint acs_named_objs_pk
+	primary key (object_id, locale)
 );
 
 create index acs_named_objs_name_ix on acs_named_objects (substr(upper(object_name),1,1));
Index: openacs-4/packages/categories/sql/oracle/category-tree-package.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/sql/oracle/category-tree-package.sql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/categories/sql/oracle/category-tree-package.sql	23 Apr 2003 12:29:27 -0000	1.1
+++ openacs-4/packages/categories/sql/oracle/category-tree-package.sql	9 May 2003 06:08:04 -0000	1.2
@@ -77,7 +77,7 @@
     ------------------------------------------------------------
     --	LOCAL FUNCTIONS and PROCEDURES
     ------------------------------------------------------------
-    FUNCTION index_childs(p_parent_id integer, ind integer) RETURN integer;
+    FUNCTION index_children(p_parent_id integer, ind integer) RETURN integer;
 
     ------------------------------------------------------------
     --	PUBLIC FUNCTIONS and PROCEDURES
@@ -354,7 +354,7 @@
 			  from categories
 			  where tree_id = refresh_nested_ind.tree_id
 			  and parent_id is null) loop
-		v_right_ind := index_childs(top_nodes.category_id, v_left_ind);
+		v_right_ind := index_children(top_nodes.category_id, v_left_ind);
 
 		update categories
 		set left_ind = v_left_ind,
@@ -367,7 +367,7 @@
 
     ---------------------------------------------------------------------
 
-    FUNCTION index_childs(p_parent_id integer, ind integer) return integer 
+    FUNCTION index_children(p_parent_id integer, ind integer) return integer 
     IS
 	TYPE type_categories IS TABLE OF integer;
 	nodes type_categories := type_categories();
@@ -391,13 +391,13 @@
 	   for j in 1..i loop
 	        v_ind := v_ind + 1;
 	        v_left_ind := v_ind;
-	        v_ind:= index_childs(nodes(j), v_ind);
+	        v_ind:= index_children(nodes(j), v_ind);
 	        v_ind := v_ind + 1;
 		update categories set left_ind = v_left_ind, right_ind = v_ind where category_id = nodes(j);
 	   end loop;
 	end if;
 	return v_ind;
-    END index_childs;
+    END index_children;
 
 end category_tree;
 /