Index: openacs-4/packages/dotlrn-forums/sql/postgresql/dotlrn-forums-admin-portlet-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-forums/sql/postgresql/dotlrn-forums-admin-portlet-create.sql,v
diff -u -r1.2 -r1.2.18.1
--- openacs-4/packages/dotlrn-forums/sql/postgresql/dotlrn-forums-admin-portlet-create.sql	4 Dec 2002 09:51:50 -0000	1.2
+++ openacs-4/packages/dotlrn-forums/sql/postgresql/dotlrn-forums-admin-portlet-create.sql	18 Aug 2014 21:46:03 -0000	1.2.18.1
@@ -32,61 +32,67 @@
 -- License version 2 or higher.  Full text of the license is available
 -- from the GNU Project: http://www.fsf.org/copyleft/gpl.html
 
-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
   ds_id := portal_datasource__new(
-         ''dotlrn_forums_admin_portlet'', --     name
-         ''Displays the dotlrn_forums_admin'' --     description
+         'dotlrn_forums_admin_portlet', --     name
+         'Displays the dotlrn_forums_admin' --     description
   );
 
   -- 4 defaults procs
 
   -- shadeable_p 
   perform portal_datasource__set_def_param (
          ds_id, -- 	datasource_id
-         ''t'', -- 	config_required_p
-         ''t'', -- 	configured_p
-         ''shadeable_p'', -- 	key
-         ''f'' -- 	value
+         't', -- 	config_required_p
+         't', -- 	configured_p
+         'shadeable_p', -- 	key
+         'f' -- 	value
   );	
 
   -- shaded_p 
   perform portal_datasource__set_def_param (
          ds_id, -- 	datasource_id
-         ''t'', -- 	config_required_p
-         ''t'', -- 	configured_p
-         ''shaded_p'', -- 	key
-         ''f'' -- 	value
+         't', -- 	config_required_p
+         't', -- 	configured_p
+         'shaded_p', -- 	key
+         'f' -- 	value
   );	
 
   -- hideable_p 
   perform portal_datasource__set_def_param (
          ds_id, -- 	datasource_id
-         ''t'', -- 	config_required_p
-         ''t'', -- 	configured_p
-         ''hideable_p'', -- 	key
-         ''t'' -- 	value
+         't', -- 	config_required_p
+         't', -- 	configured_p
+         'hideable_p', -- 	key
+         't' -- 	value
   );	
 
   -- user_editable_p 
   perform portal_datasource__set_def_param (
          ds_id, -- 	datasource_id
-         ''t'', -- 	config_required_p
-         ''t'', -- 	configured_p
-         ''user_editable_p'', -- 	key
-         ''f'' -- 	value
+         't', -- 	config_required_p
+         't', -- 	configured_p
+         'user_editable_p', -- 	key
+         'f' -- 	value
   );	
 
   -- link_hideable_p 
   perform portal_datasource__set_def_param (
          ds_id, -- 	datasource_id
-         ''t'', -- 	config_required_p
-         ''t'', -- 	configured_p
-         ''link_hideable_p'', -- 	key
-         ''t'' -- 	value
+         't', -- 	config_required_p
+         't', -- 	configured_p
+         'link_hideable_p', -- 	key
+         't' -- 	value
   );	
 
 
@@ -95,121 +101,143 @@
   -- package_id must be configured
   perform portal_datasource__set_def_param (
          ds_id, -- 	datasource_id
-         ''t'', -- 	config_required_p
-         ''f'', -- 	configured_p
-         ''package_id'', -- 	key
-         '''' -- 	value
+         't', -- 	config_required_p
+         'f', -- 	configured_p
+         'package_id', -- 	key
+         '' -- 	value
   );	
 
   return 0;
 
-end;' language 'plpgsql';
+END;
+$$ LANGUAGE plpgsql;
 select inline_0();
 drop function inline_0();
 
 
-create function inline_0()
-returns integer as '
-declare
+
+
+--
+-- procedure inline_0/0
+--
+CREATE OR REPLACE FUNCTION inline_0(
+
+) RETURNS integer AS $$
+DECLARE
 	foo integer;
-begin
+BEGIN
 	-- create the implementation
 	perform acs_sc_impl__new (
-		''portal_datasource'',
-		''dotlrn_forums_admin_portlet'',
-		''dotlrn_forums_admin_portlet''
+		'portal_datasource',
+		'dotlrn_forums_admin_portlet',
+		'dotlrn_forums_admin_portlet'
 	);
   return 0;
 
-end;' language 'plpgsql';
+END;
+$$ LANGUAGE plpgsql;
 
 select inline_0();
 drop function inline_0();
 
-create function inline_0()
-returns integer as '
-declare
+
+
+--
+-- procedure inline_0/0
+--
+CREATE OR REPLACE FUNCTION inline_0(
+
+) RETURNS integer AS $$
+DECLARE
 	foo integer;
-begin
+BEGIN
 
 	-- add all the hooks
 	perform acs_sc_impl_alias__new (
-	       ''portal_datasource'',
-	       ''dotlrn_forums_admin_portlet'',
-	       ''GetMyName'',
-	       ''dotlrn_forums_admin_portlet::get_my_name'',
-	       ''TCL''
+	       'portal_datasource',
+	       'dotlrn_forums_admin_portlet',
+	       'GetMyName',
+	       'dotlrn_forums_admin_portlet::get_my_name',
+	       'TCL'
 	);
 
 	perform acs_sc_impl_alias__new (
-	       ''portal_datasource'',
-	       ''dotlrn_forums_admin_portlet'',
-	       ''GetPrettyName'',
-	       ''dotlrn_forums_admin_portlet::get_pretty_name'',
-	       ''TCL''
+	       'portal_datasource',
+	       'dotlrn_forums_admin_portlet',
+	       'GetPrettyName',
+	       'dotlrn_forums_admin_portlet::get_pretty_name',
+	       'TCL'
 	);
 
 	perform acs_sc_impl_alias__new (
-	       ''portal_datasource'',
-	       ''dotlrn_forums_admin_portlet'',
-	       ''Link'',
-	       ''dotlrn_forums_admin_portlet::link'',
-	       ''TCL''
+	       'portal_datasource',
+	       'dotlrn_forums_admin_portlet',
+	       'Link',
+	       'dotlrn_forums_admin_portlet::link',
+	       'TCL'
 	);
 
 	perform acs_sc_impl_alias__new (
-	       ''portal_datasource'',
-	       ''dotlrn_forums_admin_portlet'',
-	       ''AddSelfToPage'',
-	       ''dotlrn_forums_admin_portlet::add_self_to_page'',
-	       ''TCL''
+	       'portal_datasource',
+	       'dotlrn_forums_admin_portlet',
+	       'AddSelfToPage',
+	       'dotlrn_forums_admin_portlet::add_self_to_page',
+	       'TCL'
 	);
 
 	perform acs_sc_impl_alias__new (
-	       ''portal_datasource'',
-	       ''dotlrn_forums_admin_portlet'',
-	       ''Show'',
-	       ''dotlrn_forums_admin_portlet::show'',
-	       ''TCL''
+	       'portal_datasource',
+	       'dotlrn_forums_admin_portlet',
+	       'Show',
+	       'dotlrn_forums_admin_portlet::show',
+	       'TCL'
 	);
 
 	perform acs_sc_impl_alias__new (
-	       ''portal_datasource'',
-	       ''dotlrn_forums_admin_portlet'',
-	       ''Edit'',
-	       ''dotlrn_forums_admin_portlet::edit'',
-	       ''TCL''
+	       'portal_datasource',
+	       'dotlrn_forums_admin_portlet',
+	       'Edit',
+	       'dotlrn_forums_admin_portlet::edit',
+	       'TCL'
 	);
 
 	perform acs_sc_impl_alias__new (
-	       ''portal_datasource'',
-	       ''dotlrn_forums_admin_portlet'',
-	       ''RemoveSelfFromPage'',
-	       ''dotlrn_forums_admin_portlet::remove_self_from_page'',
-	       ''TCL''
+	       'portal_datasource',
+	       'dotlrn_forums_admin_portlet',
+	       'RemoveSelfFromPage',
+	       'dotlrn_forums_admin_portlet::remove_self_from_page',
+	       'TCL'
 	);
 
         return 0;
 
-end;' language 'plpgsql';
+END;
+$$ LANGUAGE plpgsql;
 
 select inline_0();
 drop function inline_0();
 
-create function inline_0()
-returns integer as '
-declare
+
+
+--
+-- procedure inline_0/0
+--
+CREATE OR REPLACE FUNCTION inline_0(
+
+) RETURNS integer AS $$
+DECLARE
 	foo integer;
-begin
+BEGIN
 
 	-- Add the binding
 	perform acs_sc_binding__new (
-                ''portal_datasource'', -- 	    contract_name
-                ''dotlrn_forums_admin_portlet'' -- 	    impl_name
+                'portal_datasource', -- 	    contract_name
+                'dotlrn_forums_admin_portlet' -- 	    impl_name
 	);
   return 0;
 
-end;' language 'plpgsql';
+END;
+$$ LANGUAGE plpgsql;
 
 select inline_0();
 drop function inline_0();
Index: openacs-4/packages/dotlrn-forums/sql/postgresql/dotlrn-forums-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-forums/sql/postgresql/dotlrn-forums-create.sql,v
diff -u -r1.4 -r1.4.18.1
--- openacs-4/packages/dotlrn-forums/sql/postgresql/dotlrn-forums-create.sql	4 Dec 2002 09:51:50 -0000	1.4
+++ openacs-4/packages/dotlrn-forums/sql/postgresql/dotlrn-forums-create.sql	18 Aug 2014 21:46:03 -0000	1.4.18.1
@@ -25,128 +25,128 @@
 -- 2002-07-12
 --
 
-create function inline_0()
-returns integer as '
-begin
+CREATE OR REPLACE FUNCTION inline_0() RETURNS integer AS $$
+BEGIN
 
     perform acs_sc_impl__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''dotlrn_forums''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'dotlrn_forums'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''GetPrettyName'',
-        ''dotlrn_forums::get_pretty_name'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'GetPrettyName',
+        'dotlrn_forums::get_pretty_name',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''AddApplet'',
-        ''dotlrn_forums::add_applet'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'AddApplet',
+        'dotlrn_forums::add_applet',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''RemoveApplet'',
-        ''dotlrn_forums::remove_applet'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'RemoveApplet',
+        'dotlrn_forums::remove_applet',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''AddAppletToCommunity'',
-        ''dotlrn_forums::add_applet_to_community'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'AddAppletToCommunity',
+        'dotlrn_forums::add_applet_to_community',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''RemoveAppletFromCommunity'',
-        ''dotlrn_forums::remove_applet_from_community'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'RemoveAppletFromCommunity',
+        'dotlrn_forums::remove_applet_from_community',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''AddUser'',
-        ''dotlrn_forums::add_user'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'AddUser',
+        'dotlrn_forums::add_user',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''RemoveUser'',
-        ''dotlrn_forums::remove_user'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'RemoveUser',
+        'dotlrn_forums::remove_user',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''AddUserToCommunity'',
-        ''dotlrn_forums::add_user_to_community'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'AddUserToCommunity',
+        'dotlrn_forums::add_user_to_community',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''RemoveUserFromCommunity'',
-        ''dotlrn_forums::remove_user_from_community'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'RemoveUserFromCommunity',
+        'dotlrn_forums::remove_user_from_community',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''AddPortlet'',
-        ''dotlrn_forums::add_portlet'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'AddPortlet',
+        'dotlrn_forums::add_portlet',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''RemovePortlet'',
-        ''dotlrn_forums::remove_portlet'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'RemovePortlet',
+        'dotlrn_forums::remove_portlet',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''Clone'',
-        ''dotlrn_forums::clone'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'Clone',
+        'dotlrn_forums::clone',
+        'TCL'
     );
 
     perform acs_sc_impl_alias__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums'',
-        ''ChangeEventHandler'',
-        ''dotlrn_forums::change_event_handler'',
-        ''TCL''
+        'dotlrn_applet',
+        'dotlrn_forums',
+        'ChangeEventHandler',
+        'dotlrn_forums::change_event_handler',
+        'TCL'
     );
 
     perform acs_sc_binding__new (
-        ''dotlrn_applet'',
-        ''dotlrn_forums''
+        'dotlrn_applet',
+        'dotlrn_forums'
     );
 
     return 0;
 
-end;' language 'plpgsql';
+END;
+$$ LANGUAGE plpgsql;
 
 select inline_0();
 drop function inline_0();
Index: openacs-4/packages/dotlrn-fs/sql/postgresql/dotlrn-fs-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-fs/sql/postgresql/dotlrn-fs-create.sql,v
diff -u -r1.3 -r1.3.22.1
--- openacs-4/packages/dotlrn-fs/sql/postgresql/dotlrn-fs-create.sql	9 Aug 2002 18:39:28 -0000	1.3
+++ openacs-4/packages/dotlrn-fs/sql/postgresql/dotlrn-fs-create.sql	18 Aug 2014 21:50:27 -0000	1.3.22.1
@@ -27,143 +27,150 @@
 -- ported to postgres 2002-07-09
 
 
-create function inline_0()
-returns integer as '
-declare
+
+
+--
+-- procedure inline_0/0
+--
+CREATE OR REPLACE FUNCTION inline_0(
+
+) RETURNS integer AS $$
+DECLARE
 	foo integer;
-begin
+BEGIN
 	-- create the implementation
 	foo := acs_sc_impl__new (
-		''dotlrn_applet'',
-		''dotlrn_fs'',
-		''dotlrn_fs''
+		'dotlrn_applet',
+		'dotlrn_fs',
+		'dotlrn_fs'
 	);
 
 	-- add all the hooks
 
 	-- GetPrettyName
 	foo := acs_sc_impl_alias__new (
-	       ''dotlrn_applet'',
-	       ''dotlrn_fs'',
-	       ''GetPrettyName'',
-	       ''dotlrn_fs::get_pretty_name'',
-	       ''TCL''
+	       'dotlrn_applet',
+	       'dotlrn_fs',
+	       'GetPrettyName',
+	       'dotlrn_fs::get_pretty_name',
+	       'TCL'
 	);
 
 	-- AddApplet
 	foo := acs_sc_impl_alias__new (
-	       ''dotlrn_applet'',
-	       ''dotlrn_fs'',
-	       ''AddApplet'',
-	       ''dotlrn_fs::add_applet'',
-	       ''TCL''
+	       'dotlrn_applet',
+	       'dotlrn_fs',
+	       'AddApplet',
+	       'dotlrn_fs::add_applet',
+	       'TCL'
 	);
 
 	-- RemoveApplet
 	foo := acs_sc_impl_alias__new (
-	       ''dotlrn_applet'',
-	       ''dotlrn_fs'',
-	       ''RemoveApplet'',
-	       ''dotlrn_fs::remove_applet'',
-	       ''TCL''
+	       'dotlrn_applet',
+	       'dotlrn_fs',
+	       'RemoveApplet',
+	       'dotlrn_fs::remove_applet',
+	       'TCL'
 	);
 
 	-- AddAppletToCommunity
 	foo := acs_sc_impl_alias__new (
-	       ''dotlrn_applet'',
-	       ''dotlrn_fs'',
-	       ''AddAppletToCommunity'',
-	       ''dotlrn_fs::add_applet_to_community'',
-	       ''TCL''
+	       'dotlrn_applet',
+	       'dotlrn_fs',
+	       'AddAppletToCommunity',
+	       'dotlrn_fs::add_applet_to_community',
+	       'TCL'
 	);
 
 	-- RemoveAppletFromCommunity
 	foo := acs_sc_impl_alias__new (
-	       ''dotlrn_applet'',
-	       ''dotlrn_fs'',
-	       ''RemoveAppletFromCommunity'',
-	       ''dotlrn_fs::remove_applet_from_community'',
-	       ''TCL''
+	       'dotlrn_applet',
+	       'dotlrn_fs',
+	       'RemoveAppletFromCommunity',
+	       'dotlrn_fs::remove_applet_from_community',
+	       'TCL'
 	);
 
 	-- AddUser
 	foo := acs_sc_impl_alias__new (
-	       ''dotlrn_applet'',
-	       ''dotlrn_fs'',
-	       ''AddUser'',
-	       ''dotlrn_fs::add_user'',
-	       ''TCL''
+	       'dotlrn_applet',
+	       'dotlrn_fs',
+	       'AddUser',
+	       'dotlrn_fs::add_user',
+	       'TCL'
 	);
 
 	-- RemoveUser
 	foo := acs_sc_impl_alias__new (
-	       ''dotlrn_applet'',
-	       ''dotlrn_fs'',
-	       ''RemoveUser'',
-	       ''dotlrn_fs::remove_user'',
-	       ''TCL''
+	       'dotlrn_applet',
+	       'dotlrn_fs',
+	       'RemoveUser',
+	       'dotlrn_fs::remove_user',
+	       'TCL'
 	);
 
 	-- AddUserToCommunity
 	foo := acs_sc_impl_alias__new (
-	       ''dotlrn_applet'',
-	       ''dotlrn_fs'',
-	       ''AddUserToCommunity'',
-	       ''dotlrn_fs::add_user_to_community'',
-	       ''TCL''
+	       'dotlrn_applet',
+	       'dotlrn_fs',
+	       'AddUserToCommunity',
+	       'dotlrn_fs::add_user_to_community',
+	       'TCL'
 	);
 
 	-- RemoveUserFromCommunity
 	foo := acs_sc_impl_alias__new (
-	       ''dotlrn_applet'',
-	       ''dotlrn_fs'',
-	       ''RemoveUserFromCommunity'',
-	       ''dotlrn_fs::remove_user_from_community'',
-	       ''TCL''
+	       'dotlrn_applet',
+	       'dotlrn_fs',
+	       'RemoveUserFromCommunity',
+	       'dotlrn_fs::remove_user_from_community',
+	       'TCL'
 	);
 
     -- AddPortlet
     foo := acs_sc_impl_alias__new (
-          ''dotlrn_applet'',
-          ''dotlrn_fs'',
-          ''AddPortlet'',
-          ''dotlrn_fs::add_portlet'',
-          ''TCL''
+          'dotlrn_applet',
+          'dotlrn_fs',
+          'AddPortlet',
+          'dotlrn_fs::add_portlet',
+          'TCL'
     );
 
     -- RemovePortlet
     foo := acs_sc_impl_alias__new (
-          ''dotlrn_applet'',
-          ''dotlrn_fs'',
-          ''RemovePortlet'',
-          ''dotlrn_fs::remove_portlet'',
-          ''TCL''
+          'dotlrn_applet',
+          'dotlrn_fs',
+          'RemovePortlet',
+          'dotlrn_fs::remove_portlet',
+          'TCL'
     );
 
     foo := acs_sc_impl_alias__new (
-          ''dotlrn_applet'',
-          ''dotlrn_fs'',
-          ''Clone'',
-          ''dotlrn_fs::clone'',
-          ''TCL''
+          'dotlrn_applet',
+          'dotlrn_fs',
+          'Clone',
+          'dotlrn_fs::clone',
+          'TCL'
     );
 
     foo := acs_sc_impl_alias__new (
-          ''dotlrn_applet'',
-          ''dotlrn_fs'',
-          ''ChangeEventHandler'',
-          ''dotlrn_fs::change_event_handler'',
-          ''TCL''
+          'dotlrn_applet',
+          'dotlrn_fs',
+          'ChangeEventHandler',
+          'dotlrn_fs::change_event_handler',
+          'TCL'
     );
 
     perform acs_sc_binding__new (
-            ''dotlrn_applet'',
-            ''dotlrn_fs''
+            'dotlrn_applet',
+            'dotlrn_fs'
     );
 
     return 0;
 
-end;' language 'plpgsql';
+END;
+$$ LANGUAGE plpgsql;
 
 select inline_0();
 drop function inline_0();