Index: openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-create.sql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-create.sql	9 Nov 2001 19:41:38 -0000	1.4
+++ openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-create.sql	17 Nov 2001 22:05:06 -0000	1.5
@@ -18,21 +18,21 @@
   ds_id portal_datasources.datasource_id%TYPE;
 begin
   ds_id := portal_datasource.new(
-    data_type        => 'tcl_proc',
-    mime_type        => 'text/html',
     name             => 'dotlrn-portlet',
-    description      => 'Displays the dotlrn community info ',
-    content	     => 'dotlrn_portlet::show',
-    configurable_p   => 't'
+    description      => 'Displays the dotlrn community info '
   );
 
-  -- community_id must be configured!
+
+
+  -- 4 defaults procs
+
+  -- shadeable_p 
   portal_datasource.set_def_param (
 	datasource_id => ds_id,
 	config_required_p => 't',
-	configured_p => 'f',
-	key => 'community_id',
-	value => ''
+	configured_p => 't',
+	key => 'shadeable_p',
+	value => 't'
 );	
 
   -- shaded_p 
@@ -44,6 +44,35 @@
 	value => 'f'
 );	
 
+  -- hideable_p 
+  portal_datasource.set_def_param (
+	datasource_id => ds_id,
+	config_required_p => 't',
+	configured_p => 't',
+	key => 'hideable_p',
+	value => 't'
+);	
+
+  -- 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'
+);	
+
+  -- portlet-specific procs
+
+  -- community_id must be configured!
+  portal_datasource.set_def_param (
+	datasource_id => ds_id,
+	config_required_p => 't',
+	configured_p => 'f',
+	key => 'community_id',
+	value => ''
+);	
+
 end;
 /
 show errors
Index: openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-drop.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-drop.sql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-drop.sql	9 Oct 2001 00:04:36 -0000	1.2
+++ openacs-4/packages/dotlrn-portlet/sql/oracle/dotlrn-portlet-drop.sql	17 Nov 2001 22:05:48 -0000	1.3
@@ -34,3 +34,78 @@
 /
 show errors;
 
+declare
+	foo integer;
+begin
+
+	-- add all the hooks
+	foo := acs_sc_impl.delete_alias (
+	       'portal_datasource',
+	       'dotlrn_portlet',
+	       'MyName'
+	);
+
+	foo := acs_sc_impl.delete_alias (
+	       'portal_datasource',
+	       'dotlrn_portlet',
+	       'GetPrettyName'
+	);
+
+
+	foo := acs_sc_impl.delete_alias (
+	       'portal_datasource',
+	       'dotlrn_portlet',
+	       'Link'
+	);
+
+	foo := acs_sc_impl.delete_alias (
+	       'portal_datasource',
+	       'dotlrn_portlet',
+	       'AddSelfToPage'
+	);
+
+	foo := acs_sc_impl.delete_alias (
+	       'portal_datasource',
+	       'dotlrn_portlet',
+	       'Show'
+	);
+
+	foo := acs_sc_impl.delete_alias (
+	       'portal_datasource',
+	       'dotlrn_portlet',
+	       'Edit'
+	);
+
+	foo := acs_sc_impl.delete_alias (
+	       'portal_datasource',
+	       'dotlrn_portlet',
+	       'RemoveSelfFromPage'
+	);
+
+	foo := acs_sc_impl.delete_alias (
+	       'portal_datasource',
+	       'dotlrn_portlet',
+	       'MakeSelfAvailable'
+	);
+
+	foo := acs_sc_impl.delete_alias (
+	       'portal_datasource',
+	       'dotlrn_portlet',
+	       'MakeSelfUnavailable'
+	);
+
+	-- Drop the binding
+	acs_sc_binding.delete (
+	    contract_name => 'portal_datasource',
+	    impl_name => 'dotlrn_portlet'
+	);
+
+	-- drop the impl
+	foo := acs_sc_impl.delete (
+		'portal_datasource',
+		'dotlrn_portlet'
+	);
+end;
+/
+show errors
+