Index: openacs-4/packages/rss-support/sql/postgresql/rss-generation-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/rss-support/sql/postgresql/rss-generation-create.sql,v diff -u -r1.10.4.1 -r1.10.4.2 --- openacs-4/packages/rss-support/sql/postgresql/rss-generation-create.sql 13 Dec 2004 16:13:24 -0000 1.10.4.1 +++ openacs-4/packages/rss-support/sql/postgresql/rss-generation-create.sql 23 Jan 2005 21:05:45 -0000 1.10.4.2 @@ -164,6 +164,7 @@ Used for display purposes. '; +select define_function_args ('rss_gen_subscr__new','subscr_id,impl_id,summary_context_id,timeout,lastbuild,object_type,creation_date;now,creation_user,creation_ip,context_id'); create function rss_gen_subscr__new ( integer, -- subscr_id integer, -- impl_id @@ -222,10 +223,11 @@ return ''RSS Generation Subscription #'' || p_subscr_id; end;' language 'plpgsql'; -create function rss_gen_subscr__delete (integer) +select define_function_args('rss_gen_subscr__del','subscr_id'); +create or replace function rss_gen_subscr__del (integer) returns integer as ' declare - p_subscr_id alias for $1; + p_subscr_id alias for $1; begin delete from acs_permissions where object_id = p_subscr_id; @@ -239,3 +241,11 @@ return 0; end;' language 'plpgsql'; + +create or replace function rss_gen_subscr__delete (integer) +returns integer as ' +declare + p_subscr_id alias for $1; +begin + return rss_gen_subscr__del (p_subscr_id); +end;' language 'plpgsql';