Index: openacs-4/packages/acs-reference/sql/oracle/acs-reference-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-reference/sql/oracle/acs-reference-create.sql,v
diff -u -N -r1.3 -r1.4
--- openacs-4/packages/acs-reference/sql/oracle/acs-reference-create.sql	27 Aug 2001 02:49:48 -0000	1.3
+++ openacs-4/packages/acs-reference/sql/oracle/acs-reference-create.sql	30 Sep 2003 12:10:02 -0000	1.4
@@ -92,7 +92,7 @@
         last_name       in persons.last_name%TYPE default null
     ) return acs_objects.object_id%TYPE;
 
-    procedure delete (
+    procedure del (
         repository_id in acs_reference_repositories.repository_id%TYPE
     );
 
@@ -174,23 +174,23 @@
         return v_repository_id;    
     end new;
 
-    procedure delete (
+    procedure del (
         repository_id in acs_reference_repositories.repository_id%TYPE
     )
     is
 	v_maintainer_id integer;
     begin
 	select maintainer_id into v_maintainer_id
 	from   acs_reference_repositories
-	where  repository_id = acs_reference.delete.repository_id;
+	where  repository_id = acs_reference.del.repository_id;
 
         delete from acs_reference_repositories
-        where  repository_id = acs_reference.delete.repository_id;
+        where  repository_id = acs_reference.del.repository_id;
 
-        acs_object.delete(repository_id);
-	person.delete(v_maintainer_id);
+        acs_object.del(repository_id);
+	person.del(v_maintainer_id);
 
-    end delete;
+    end del;
 
     function is_expired_p (
 	repository_id integer
