Index: openacs-4/contrib/obsolete-packages/ticket-tracker/sql/oracle/ticket-tracker-packages.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/obsolete-packages/ticket-tracker/sql/oracle/ticket-tracker-packages.sql,v
diff -u -r1.10 -r1.11
--- openacs-4/contrib/obsolete-packages/ticket-tracker/sql/oracle/ticket-tracker-packages.sql	13 Mar 2002 22:50:53 -0000	1.10
+++ openacs-4/contrib/obsolete-packages/ticket-tracker/sql/oracle/ticket-tracker-packages.sql	30 Sep 2003 12:10:00 -0000	1.11
@@ -31,7 +31,7 @@
         creation_ip	 in acs_objects.creation_ip%TYPE         default null
     ) return ttracker_tickets.ticket_id%TYPE;
 
-    procedure delete (
+    procedure del (
         ticket_id    in ttracker_tickets.ticket_id%TYPE
     );
 
@@ -76,7 +76,7 @@
         description         in ttracker_categories.description%TYPE      default null
     ) return acs_objects.object_id%TYPE;
 
-    procedure delete (
+    procedure del (
       category_id		in ttracker_categories.category_id%TYPE
     );
 
@@ -269,7 +269,7 @@
         return v_ticket_id;
     end new;
 
-    procedure delete (
+    procedure del (
         ticket_id    in ttracker_tickets.ticket_id%TYPE
     )
     is
@@ -285,12 +285,12 @@
         -- delete the workflow case that's associated with this ticket
 
         if case_cur%FOUND then       
-            workflow_case.delete(case_rec.case_id);
+            workflow_case.del(case_rec.case_id);
         end if;
         
         close case_cur;
-        acs_message.delete(ticket_id);
-    end delete;
+        acs_message.del(ticket_id);
+    end del;
 
     function name (
         ticket_id    in ttracker_tickets.ticket_id%TYPE
@@ -377,7 +377,7 @@
         return v_category_id;
     end new;
 
-    procedure delete (
+    procedure del (
         category_id    in ttracker_categories.category_id%TYPE
     )
     is
@@ -386,14 +386,14 @@
         -- check if any ticket exists for this category before deleting
         select decode(count(ticket_id), 0, 0, 1) into v_ticket_number
           from ttracker_tickets 
-         where category_id = ttracker_category.delete.category_id;
+         where category_id = ttracker_category.del.category_id;
          
         if v_ticket_number > 0 then
           raise_application_error(-20000, 'Invalid severity.');          
         end if;
 
-        acs_object.delete(category_id);
-    end delete;
+        acs_object.del(category_id);
+    end del;
 
     function name (
         category_id    in ttracker_categories.category_id%TYPE
