Index: openacs-4/packages/user-profile/sql/postgresql/user-profile-init.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/user-profile/sql/postgresql/user-profile-init.sql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/user-profile/sql/postgresql/user-profile-init.sql	29 Mar 2002 16:56:10 -0000	1.1
+++ openacs-4/packages/user-profile/sql/postgresql/user-profile-init.sql	27 Oct 2014 16:42:00 -0000	1.2
@@ -5,24 +5,30 @@
 -- @version $Id$
 --
 
-create function inline_1()
-returns integer as '
+
+
+--
+-- procedure inline_1/0
+--
+CREATE OR REPLACE FUNCTION inline_1(
+
+) RETURNS integer AS $$
 DECLARE
 	foo integer;
 BEGIN
     PERFORM acs_rel_type__create_type(
-        ''user_profile_rel'',
-        ''Profiled User Membership'',
-        ''Profiled User Memberships'',
-        ''membership_rel'',
-        ''user_profile_rels'',
-        ''rel_id'',
-        ''user_profile_rel'',
-        ''profiled_group'',
+        'user_profile_rel',
+        'Profiled User Membership',
+        'Profiled User Memberships',
+        'membership_rel',
+        'user_profile_rels',
+        'rel_id',
+        'user_profile_rel',
+        'profiled_group',
         null,
         0,
         null,
-        ''user'',
+        'user',
         null,
         0,
         1
@@ -31,30 +37,31 @@
     select min(impl_id)
     into foo
     from acs_sc_impls
-    where impl_name = ''user_profile_provider'';
+    where impl_name = 'user_profile_provider';
 
     foo:= profiled_group__new(
 	   foo,
-	   ''Profiled Users''
+	   'Profiled Users'
     );
 
     PERFORM rel_segment__new(
         NULL,
-	''rel_segment'',
+	'rel_segment',
 	NULL,
 	NULL,
 	NULL,
 	NULL,
 	NULL,
-        ''Profiled Users'',
+        'Profiled Users',
         foo,
-        ''user_profile_rel'',
+        'user_profile_rel',
 	NULL
     );
 
     return 0;
-end;
-' language 'plpgsql';
+END;
 
+$$ LANGUAGE plpgsql;
+
 select inline_1();
 drop function inline_1();