Index: openacs-4/packages/dotlrn/sql/postgresql/dotlrn-main-portlet-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/postgresql/Attic/dotlrn-main-portlet-create.sql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/dotlrn/sql/postgresql/dotlrn-main-portlet-create.sql	2 Jul 2002 18:40:08 -0000	1.4
+++ openacs-4/packages/dotlrn/sql/postgresql/dotlrn-main-portlet-create.sql	2 Jul 2002 19:53:51 -0000	1.5
@@ -32,7 +32,7 @@
 -- from the GNU Project: http://www.fsf.org/copyleft/gpl.html
 
 create function inline_0 ()
-return integer as '
+returns integer as '
 declare
 begin
     ds_id portal_datasources.datasource_id%TYPE;
@@ -45,87 +45,87 @@
     --  the standard 4 params
 
     -- shadeable_p
-    select portal_datasource.set_def_param(
+    perform portal_datasource.set_def_param(
         ds_id, ''t'', ''t'', ''shadeable_p'', ''f''
     );
 
     -- hideable_p
-    select portal_datasource__set_def_param(
+    perform portal_datasource__set_def_param(
         ds_id, ''t'', ''t'', ''hideable_p'', ''f''
     );
 
     -- user_editable_p
-    select portal_datasource__set_def_param(
+    perform portal_datasource__set_def_param(
         ds_id, ''t'', ''t'', ''user_editable_p'', ''f''
     );
 
     -- shaded_p
-    select portal_datasource__set_def_param(
+    perform portal_datasource__set_def_param(
         ds_id, ''t'', ''t'', ''shaded_p'', ''f''
     );
 
     -- link_hideable_p
-    select portal_datasource__set_def_param(
+    perform portal_datasource__set_def_param(
         ds_id, ''t'', ''t'', ''link_hideable_p'', ''t''
     );
 
     -- create the implementation
-    select acs_sc_impl__new(
+    perform acs_sc_impl__new(
         ''portal_datasource'',
         ''dotlrn_main_portlet'',
         ''dotlrn_main_portlet''
     );
 
         -- add all the hooks
-    select acs_sc_impl_alias__new (
+    perform acs_sc_impl_alias__new (
            ''portal_datasource'',
            ''dotlrn_main_portlet'',
            ''GetMyName'',
            ''dotlrn_main_portlet::get_my_name'',
            ''TCL''
     );
 
-    select acs_sc_impl_alias__new (
+    perform acs_sc_impl_alias__new (
            ''portal_datasource'',
                ''dotlrn_main_portlet'',
                ''GetPrettyName'',
                ''dotlrn_main_portlet::get_pretty_name'',
                ''TCL''
         );
 
-        select acs_sc_impl_alias__new (
+        perform acs_sc_impl_alias__new (
                ''portal_datasource'',
                ''dotlrn_main_portlet'',
                ''Link'',
                ''dotlrn_main_portlet::link'',
                ''TCL''
         );
 
-        select acs_sc_impl_alias__new (
+        perform acs_sc_impl_alias__new (
                ''portal_datasource'',
                ''dotlrn_main_portlet'',
                ''AddSelfToPage'',
                ''dotlrn_main_portlet::add_self_to_page'',
                ''TCL''
         );
 
-        select acs_sc_impl_alias__new (
+        perform acs_sc_impl_alias__new (
                ''portal_datasource'',
                ''dotlrn_main_portlet'',
                ''RemoveSelfFromPage'',
                ''dotlrn_main_portlet::remove_self_from_page'',
                ''TCL''
         );
 
-        select acs_sc_impl_alias__new (
+        perform acs_sc_impl_alias__new (
                ''portal_datasource'',
                ''dotlrn_main_portlet'',
                ''Show'',
                ''dotlrn_main_portlet::show'',
                ''TCL''
         );
 
-        select acs_sc_impl_alias__new (
+        perform acs_sc_impl_alias__new (
                ''portal_datasource'',
                ''dotlrn_main_portlet'',
                ''Edit'',
@@ -134,7 +134,7 @@
         );
 
         -- Add the binding
-        select acs_sc_binding__new (
+        perform acs_sc_binding__new (
                ''portal_datasource'',
                ''dotlrn_main_portlet''
         );
