Index: openacs-4/packages/news-portlet/sql/postgresql/news-admin-portlet-drop.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/news-portlet/sql/postgresql/news-admin-portlet-drop.sql,v diff -u -r1.2 -r1.2.22.1 --- openacs-4/packages/news-portlet/sql/postgresql/news-admin-portlet-drop.sql 9 Aug 2002 18:39:32 -0000 1.2 +++ openacs-4/packages/news-portlet/sql/postgresql/news-admin-portlet-drop.sql 19 Aug 2014 16:58:48 -0000 1.2.22.1 @@ -35,18 +35,24 @@ -- -- 10 July 2002 -create function inline_0 () -returns integer as ' -declare + + +-- +-- procedure inline_0/0 +-- +CREATE OR REPLACE FUNCTION inline_0( + +) RETURNS integer AS $$ +DECLARE ds_id portal_datasources.datasource_id%TYPE; -begin +BEGIN select datasource_id into ds_id from portal_datasources - where name = ''news_admin_portlet''; + where name = 'news_admin_portlet'; if not found then - raise exception ''No datasource_id found here '',ds_id ; + raise exception 'No datasource_id found here ',ds_id ; ds_id := null; end if; @@ -57,7 +63,8 @@ return 0; -end;' language 'plpgsql'; +END; +$$ LANGUAGE plpgsql; select inline_0 ();