Index: openacs-4/packages/fs-portlet/sql/postgresql/fs-admin-portlet-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/fs-portlet/sql/postgresql/fs-admin-portlet-create.sql,v
diff -u -N -r1.2 -r1.2.12.1
--- openacs-4/packages/fs-portlet/sql/postgresql/fs-admin-portlet-create.sql	24 Jul 2004 08:34:22 -0000	1.2
+++ openacs-4/packages/fs-portlet/sql/postgresql/fs-admin-portlet-create.sql	19 Aug 2014 16:54:17 -0000	1.2.12.1
@@ -21,155 +21,162 @@
 -- @version $Id$
 -- 
 
-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_admin_portlet'',
-	   ''Displays the given folder_id''
+	   'fs_admin_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_admin_portlet'',
-        ''fs_admin_portlet''
+        'portal_datasource',
+        'fs_admin_portlet',
+        'fs_admin_portlet'
     );
 
     -- add all the hooks
     foo := acs_sc_impl_alias__new(
-        ''portal_datasource'',
-        ''fs_admin_portlet'',
-        ''GetMyName'',
-        ''fs_admin_portlet::get_my_name'',
-        ''TCL''
+        'portal_datasource',
+        'fs_admin_portlet',
+        'GetMyName',
+        'fs_admin_portlet::get_my_name',
+        'TCL'
     );
 
     foo := acs_sc_impl_alias__new(
-        ''portal_datasource'',
-        ''fs_admin_portlet'',
-        ''GetPrettyName'',
-        ''fs_admin_portlet::get_pretty_name'',
-        ''TCL''
+        'portal_datasource',
+        'fs_admin_portlet',
+        'GetPrettyName',
+        'fs_admin_portlet::get_pretty_name',
+        'TCL'
     );
 
     foo := acs_sc_impl_alias__new(
-        ''portal_datasource'',
-        ''fs_admin_portlet'',
-        ''Link'',
-        ''fs_admin_portlet::link'',
-        ''TCL''
+        'portal_datasource',
+        'fs_admin_portlet',
+        'Link',
+        'fs_admin_portlet::link',
+        'TCL'
     );
 
     foo := acs_sc_impl_alias__new(
-        ''portal_datasource'',
-        ''fs_admin_portlet'',
-        ''AddSelfToPage'',
-        ''fs_admin_portlet::add_self_to_page'',
-        ''TCL''
+        'portal_datasource',
+        'fs_admin_portlet',
+        'AddSelfToPage',
+        'fs_admin_portlet::add_self_to_page',
+        'TCL'
     );
 
     foo := acs_sc_impl_alias__new(
-        ''portal_datasource'',
-        ''fs_admin_portlet'',
-        ''Show'',
-        ''fs_admin_portlet::show'',
-        ''TCL''
+        'portal_datasource',
+        'fs_admin_portlet',
+        'Show',
+        'fs_admin_portlet::show',
+        'TCL'
     );
 
     foo := acs_sc_impl_alias__new(
-        ''portal_datasource'',
-        ''fs_admin_portlet'',
-        ''Edit'',
-        ''fs_admin_portlet::edit'',
-        ''TCL''
+        'portal_datasource',
+        'fs_admin_portlet',
+        'Edit',
+        'fs_admin_portlet::edit',
+        'TCL'
     );
 
     foo := acs_sc_impl_alias__new(
-        ''portal_datasource'',
-        ''fs_admin_portlet'',
-        ''RemoveSelfFromPage'',
-        ''fs_admin_portlet::remove_self_from_page'',
-        ''TCL''
+        'portal_datasource',
+        'fs_admin_portlet',
+        'RemoveSelfFromPage',
+        'fs_admin_portlet::remove_self_from_page',
+        'TCL'
     );
 
     -- Add the binding
     perform acs_sc_binding__new(
-          ''portal_datasource'',
-          ''fs_admin_portlet''
+          'portal_datasource',
+          'fs_admin_portlet'
     );
 
 	return 0;
 
-end;' language 'plpgsql';
+END;
+$$ LANGUAGE plpgsql;
 
 select inline_0();
 drop function inline_0();