Index: openacs-4/contrib/packages/portal/tcl/apm-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/portal/tcl/apm-callback-procs.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/contrib/packages/portal/tcl/apm-callback-procs.tcl	22 Mar 2004 17:33:41 -0000	1.10
+++ openacs-4/contrib/packages/portal/tcl/apm-callback-procs.tcl	23 Mar 2004 03:04:09 -0000	1.11
@@ -101,12 +101,29 @@
         {resource_dir /resources/portal/themes/deco-theme}
     }
     package_instantiate_object -var_list $var_list portal_theme
+
+    # Now define the portal admin portlet
+
+    portal::datasource::new -spec {
+        name        portal_admin_portlet
+        description "Portal Administration Portlet"
+        pretty_name "Portal Administration"
+        application ""
+        owner       portal
+        template    /packages/portal/lib/portal-admin-portlet
+        admin_p     t
+        aliases {
+            Initialize portal_admin_portlet::initialize
+        }
+    }
+
     
 }
 
 ad_proc portal::install::package_uninstall {} {
     Uninstall portal_datasource service contract
 } {
+    portal::datasource::delete -name portal_admin_portlet
     acs_sc::contract::delete -name portal_datasource
 }