Index: openacs-4/packages/faq-portlet/sql/oracle/faq-admin-portlet-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/faq-portlet/sql/oracle/faq-admin-portlet-create.sql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/faq-portlet/sql/oracle/faq-admin-portlet-create.sql	29 Mar 2002 19:25:19 -0000	1.2
+++ openacs-4/packages/faq-portlet/sql/oracle/faq-admin-portlet-create.sql	7 May 2002 17:53:44 -0000	1.3
@@ -15,198 +15,165 @@
 --
 
 --
--- /faq-portlet/sql/oracle/faq-portlet-create.sql
+-- Creates FAQ portlet
 --
-
--- Creates faq portlet
-
--- Copyright (C) 2001 OpenForce, Inc.
 -- @author Arjun Sanyal (arjun@openforce.net)
 -- @author Ben Adida (ben@openforce)
 -- @creation-date 2002-01-19
+-- @version $Id$
+--
 
--- $Id$
-
--- This is free software distributed under the terms of the GNU Public
--- License version 2 or higher.  Full text of the license is available
--- from the GNU Project: http://www.fsf.org/copyleft/gpl.html
-
 declare
-  ds_id portal_datasources.datasource_id%TYPE;
+    ds_id portal_datasources.datasource_id%TYPE;
 begin
-  ds_id := portal_datasource.new(
-    name             => 'faq_admin_portlet',
-    description      => 'Displays the given folder_id'
-  );
 
-  --  the standard 4 params
+    ds_id := portal_datasource.new(
+        name => 'faq_admin_portlet',
+        description => 'Displays a FAQ'
+    );
 
-  -- shadeable_p 
-  portal_datasource.set_def_param (
-	datasource_id => ds_id,
-	config_required_p => 't',
-	configured_p => 't',
-	key => 'shadeable_p',
-	value => 'f'
-);	
+    portal_datasource.set_def_param (
+        datasource_id => ds_id,
+        config_required_p => 't',
+        configured_p => 't',
+        key => 'shadeable_p',
+        value => 'f'
+    );
 
+    portal_datasource.set_def_param (
+        datasource_id => ds_id,
+        config_required_p => 't',
+        configured_p => 't',
+        key => 'hideable_p',
+        value => 'f'
+    );
 
-  -- hideable_p 
-  portal_datasource.set_def_param (
-	datasource_id => ds_id,
-	config_required_p => 't',
-	configured_p => 't',
-	key => 'hideable_p',
-	value => 'f'
-);	
+    portal_datasource.set_def_param (
+        datasource_id => ds_id,
+        config_required_p => 't',
+        configured_p => 't',
+        key => 'user_editable_p',
+        value => 'f'
+    );
 
-  -- user_editable_p 
-  portal_datasource.set_def_param (
-	datasource_id => ds_id,
-	config_required_p => 't',
-	configured_p => 't',
-	key => 'user_editable_p',
-	value => 'f'
-);	
+    portal_datasource.set_def_param (
+        datasource_id => ds_id,
+        config_required_p => 't',
+        configured_p => 't',
+        key => 'shaded_p',
+        value => 'f'
+    );
 
-  -- shaded_p 
-  portal_datasource.set_def_param (
-	datasource_id => ds_id,
-	config_required_p => 't',
-	configured_p => 't',
-	key => 'shaded_p',
-	value => 'f'
-);	
+    portal_datasource.set_def_param (
+        datasource_id => ds_id,
+        config_required_p => 't',
+        configured_p => 't',
+        key => 'link_hideable_p',
+        value => 't'
+    );
 
-  -- link_hideable_p 
-  portal_datasource.set_def_param (
-	datasource_id => ds_id,
-	config_required_p => 't',
-	configured_p => 't',
-	key => 'link_hideable_p',
-	value => 't'
-);  
+    portal_datasource.set_def_param (
+        datasource_id => ds_id,
+        config_required_p => 't',
+        configured_p => 'f',
+        key => 'package_id',
+        value => ''
+    );
 
--- package_id must be configured
-  portal_datasource.set_def_param (
-	datasource_id => ds_id,
-	config_required_p => 't',
-	configured_p => 'f',
-	key => 'package_id',
-	value => ''
-);
-
-
 end;
 /
 show errors
 
-
 declare
-	foo integer;
+    foo integer;
 begin
-	-- create the implementation
-	foo := acs_sc_impl.new (
-		'portal_datasource',
-		'faq_admin_portlet',
-		'faq_admin_portlet'
-	);
 
-end;
-/
-show errors
+    -- create the implementation
+    foo := acs_sc_impl.new (
+        'portal_datasource',
+        'faq_admin_portlet',
+        'faq_admin_portlet'
+    );
 
-declare
-	foo integer;
-begin
+    -- add all the hooks
+    foo := acs_sc_impl.new_alias(
+        'portal_datasource',
+        'faq_admin_portlet',
+        'MyName',
+        'faq_admin_portlet::my_name',
+        'TCL'
+    );
 
-	-- add all the hooks
-	foo := acs_sc_impl.new_alias (
-	       'portal_datasource',
-	       'faq_admin_portlet',
-	       'MyName',
-	       'faq_admin_portlet::my_name',
-	       'TCL'
-	);
+    foo := acs_sc_impl.new_alias(
+        'portal_datasource',
+        'faq_admin_portlet',
+        'GetPrettyName',
+        'faq_admin_portlet::get_pretty_name',
+        'TCL'
+    );
 
-	foo := acs_sc_impl.new_alias (
-	       'portal_datasource',
-	       'faq_admin_portlet',
-	       'GetPrettyName',
-	       'faq_admin_portlet::get_pretty_name',
-	       'TCL'
-	);
+    foo := acs_sc_impl.new_alias(
+        'portal_datasource',
+        'faq_admin_portlet',
+        'Link',
+        'faq_admin_portlet::link',
+        'TCL'
+    );
 
-	foo := acs_sc_impl.new_alias (
-	       'portal_datasource',
-	       'faq_admin_portlet',
-	       'Link',
-	       'faq_admin_portlet::link',
-	       'TCL'
-	);
+    foo := acs_sc_impl.new_alias(
+        'portal_datasource',
+        'faq_admin_portlet',
+        'AddSelfToPage',
+        'faq_admin_portlet::add_self_to_page',
+        'TCL'
+    );
 
-	foo := acs_sc_impl.new_alias (
-	       'portal_datasource',
-	       'faq_admin_portlet',
-	       'AddSelfToPage',
-	       'faq_admin_portlet::add_self_to_page',
-	       'TCL'
-	);
+    foo := acs_sc_impl.new_alias(
+        'portal_datasource',
+        'faq_admin_portlet',
+        'Show',
+        'faq_admin_portlet::show',
+        'TCL'
+    );
 
-	foo := acs_sc_impl.new_alias (
-	       'portal_datasource',
-	       'faq_admin_portlet',
-	       'Show',
-	       'faq_admin_portlet::show',
-	       'TCL'
-	);
+    foo := acs_sc_impl.new_alias(
+        'portal_datasource',
+        'faq_admin_portlet',
+        'Edit',
+        'faq_admin_portlet::edit',
+        'TCL'
+    );
 
-	foo := acs_sc_impl.new_alias (
-	       'portal_datasource',
-	       'faq_admin_portlet',
-	       'Edit',
-	       'faq_admin_portlet::edit',
-	       'TCL'
-	);
+    foo := acs_sc_impl.new_alias(
+        'portal_datasource',
+        'faq_admin_portlet',
+        'RemoveSelfFromPage',
+        'faq_admin_portlet::remove_self_from_page',
+        'TCL'
+    );
 
-	foo := acs_sc_impl.new_alias (
-	       'portal_datasource',
-	       'faq_admin_portlet',
-	       'RemoveSelfFromPage',
-	       'faq_admin_portlet::remove_self_from_page',
-	       'TCL'
-	);
+    foo := acs_sc_impl.new_alias(
+        'portal_datasource',
+        'faq_admin_portlet',
+        'MakeSelfAvailable',
+        'faq_admin_portlet::make_self_available',
+        'TCL'
+    );
 
-	foo := acs_sc_impl.new_alias (
-	       'portal_datasource',
-	       'faq_admin_portlet',
-	       'MakeSelfAvailable',
-	       'faq_admin_portlet::make_self_available',
-	       'TCL'
-	);
+    foo := acs_sc_impl.new_alias(
+        'portal_datasource',
+        'faq_admin_portlet',
+        'MakeSelfUnavailable',
+        'faq_admin_portlet::make_self_unavailable',
+        'TCL'
+    );
 
-	foo := acs_sc_impl.new_alias (
-	       'portal_datasource',
-	       'faq_admin_portlet',
-	       'MakeSelfUnavailable',
-	       'faq_admin_portlet::make_self_unavailable',
-	       'TCL'
-	);
+    -- Add the binding
+    acs_sc_binding.new(
+        contract_name => 'portal_datasource',
+        impl_name => 'faq_admin_portlet'
+    );
 
 end;
 /
 show errors
-
-declare
-	foo integer;
-begin
-
-	-- Add the binding
-	acs_sc_binding.new (
-	    contract_name => 'portal_datasource',
-	    impl_name => 'faq_admin_portlet'
-	);
-end;
-/
-show errors
-