Index: openacs-4/packages/notifications/sql/postgresql/upgrade/upgrade-0.1d-0.2d.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/notifications/sql/postgresql/upgrade/upgrade-0.1d-0.2d.sql,v diff -u -r1.2 -r1.3 --- openacs-4/packages/notifications/sql/postgresql/upgrade/upgrade-0.1d-0.2d.sql 19 Aug 2002 20:38:49 -0000 1.2 +++ openacs-4/packages/notifications/sql/postgresql/upgrade/upgrade-0.1d-0.2d.sql 30 Mar 2013 18:50:28 -0000 1.3 @@ -1,13 +1,22 @@ drop function notification__delete; -create function notification__delete(integer) -returns integer as ' -declare - p_notification_id alias for $1; -begin + + +-- added +select define_function_args('notification__delete','notification_id'); + +-- +-- procedure notification__delete/1 +-- +CREATE OR REPLACE FUNCTION notification__delete( + p_notification_id integer +) RETURNS integer AS $$ +DECLARE +BEGIN delete from notifications where notification_id = p_notification_id; perform acs_object__delete(p_notification_id); return 0; -end; -' language 'plpgsql'; +END; +$$ LANGUAGE plpgsql; +