Index: openacs-4/packages/acs-content-repository/sql/postgresql/content-revision.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-content-repository/sql/postgresql/content-revision.sql,v
diff -u -r1.39 -r1.40
--- openacs-4/packages/acs-content-repository/sql/postgresql/content-revision.sql	12 Aug 2004 18:51:56 -0000	1.39
+++ openacs-4/packages/acs-content-repository/sql/postgresql/content-revision.sql	6 Jan 2005 16:52:25 -0000	1.40
@@ -446,7 +446,7 @@
 
 
 -- procedure delete
-select define_function_args('content_revision__delete','revision_id');
+select define_function_args('content_revision__del','revision_id');
 create or replace function content_revision__delete (integer)
 returns integer as '
 declare
@@ -509,7 +509,17 @@
   return 0; 
 end;' language 'plpgsql';
 
+select define_function_args('content_revision__delete','revision_id');
 
+create or replace function content_revision__delete (integer)
+returns integer as '
+declare
+  delete__revision_id    alias for $1;  
+begin
+        PERFORM content_revision__del(delete__revision_id);
+  return 0; 
+end;' language 'plpgsql';
+
 -- function get_number
 select define_function_args('content_revision__get_number','revision_id');
 create or replace function content_revision__get_number (integer)
