Index: openacs-4/packages/fs-portlet/sql/postgresql/fs-portlet-create.sql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/sql/postgresql/fs-portlet-create.sql,v diff -u -r1.3 -r1.3.12.1 --- openacs-4/packages/fs-portlet/sql/postgresql/fs-portlet-create.sql 24 Jul 2004 08:34:22 -0000 1.3 +++ openacs-4/packages/fs-portlet/sql/postgresql/fs-portlet-create.sql 19 Aug 2014 16:54:18 -0000 1.3.12.1 @@ -27,155 +27,162 @@ \i fs-contents-portlet-create.sql \i fs-admin-portlet-create.sql -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; foo integer; - begin + BEGIN ds_id := portal_datasource__new( - ''fs_portlet'', - ''Displays the given folder_id'' + 'fs_portlet', + 'Displays the given folder_id' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''t'', - ''shadeable_p'', - ''t'' + 't', + 't', + 'shadeable_p', + 't' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''t'', - ''hideable_p'', - ''t'' + 't', + 't', + 'hideable_p', + 't' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''t'', - ''user_editable_p'', - ''f'' + 't', + 't', + 'user_editable_p', + 'f' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''t'', - ''shaded_p'', - ''f'' + 't', + 't', + 'shaded_p', + 'f' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''t'', - ''link_hideable_p'', - ''t'' + 't', + 't', + 'link_hideable_p', + 't' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''f'', - ''scoped_p'', - ''t'' + 't', + 'f', + 'scoped_p', + 't' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''f'', - ''folder_id'', - '''' + 't', + 'f', + 'folder_id', + '' ); perform portal_datasource__set_def_param( ds_id, - ''t'', - ''f'', - ''contents_url'', - '''' + 't', + 'f', + 'contents_url', + '' ); -- create the implementation foo := acs_sc_impl__new( - ''portal_datasource'', - ''fs_portlet'', - ''fs_portlet'' + 'portal_datasource', + 'fs_portlet', + 'fs_portlet' ); -- add all the hooks foo := acs_sc_impl_alias__new( - ''portal_datasource'', - ''fs_portlet'', - ''GetMyName'', - ''fs_portlet::get_my_name'', - ''TCL'' + 'portal_datasource', + 'fs_portlet', + 'GetMyName', + 'fs_portlet::get_my_name', + 'TCL' ); foo := acs_sc_impl_alias__new( - ''portal_datasource'', - ''fs_portlet'', - ''GetPrettyName'', - ''fs_portlet::get_pretty_name'', - ''TCL'' + 'portal_datasource', + 'fs_portlet', + 'GetPrettyName', + 'fs_portlet::get_pretty_name', + 'TCL' ); foo := acs_sc_impl_alias__new( - ''portal_datasource'', - ''fs_portlet'', - ''Link'', - ''fs_portlet::link'', - ''TCL'' + 'portal_datasource', + 'fs_portlet', + 'Link', + 'fs_portlet::link', + 'TCL' ); foo := acs_sc_impl_alias__new( - ''portal_datasource'', - ''fs_portlet'', - ''AddSelfToPage'', - ''fs_portlet::add_self_to_page'', - ''TCL'' + 'portal_datasource', + 'fs_portlet', + 'AddSelfToPage', + 'fs_portlet::add_self_to_page', + 'TCL' ); foo := acs_sc_impl_alias__new( - ''portal_datasource'', - ''fs_portlet'', - ''Show'', - ''fs_portlet::show'', - ''TCL'' + 'portal_datasource', + 'fs_portlet', + 'Show', + 'fs_portlet::show', + 'TCL' ); foo := acs_sc_impl_alias__new( - ''portal_datasource'', - ''fs_portlet'', - ''Edit'', - ''fs_portlet::edit'', - ''TCL'' + 'portal_datasource', + 'fs_portlet', + 'Edit', + 'fs_portlet::edit', + 'TCL' ); foo := acs_sc_impl_alias__new( - ''portal_datasource'', - ''fs_portlet'', - ''RemoveSelfFromPage'', - ''fs_portlet::remove_self_from_page'', - ''TCL'' + 'portal_datasource', + 'fs_portlet', + 'RemoveSelfFromPage', + 'fs_portlet::remove_self_from_page', + 'TCL' ); -- Add the binding perform acs_sc_binding__new( - ''portal_datasource'', - ''fs_portlet'' + 'portal_datasource', + 'fs_portlet' ); return 0; -end;' language 'plpgsql'; +END; +$$ LANGUAGE plpgsql; select inline_0(); drop function inline_0();