--
-- rss_gen_subscr__del/1
--
create or replace function rss_gen_subscr__del(
  integer
) returns int4 as $$

declare
  p_subscr_id     alias for $1;
begin
	delete from acs_permissions
		   where object_id = p_subscr_id;

	delete from rss_gen_subscrs
		   where subscr_id = p_subscr_id;

	raise NOTICE 'Deleting subscription...';
	PERFORM acs_object__delete(p_subscr_id);

	return 0;

end;$$ language plpgsql;