Index: openacs-4/packages/dotlrn/sql/postgresql/externals-package-create.sql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/sql/postgresql/externals-package-create.sql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotlrn/sql/postgresql/externals-package-create.sql	12 Jul 2002 21:26:48 -0000	1.2
+++ openacs-4/packages/dotlrn/sql/postgresql/externals-package-create.sql	29 Jul 2002 18:45:49 -0000	1.3
@@ -21,7 +21,7 @@
 -- @version $Id$
 --
 
-select define_function_args ('dotlrn_external_profile_rel__new','rel_id,id,rel_type;dotlrn_external_profile_rel,group_id,user_id,creation_user,creation_ip');
+select define_function_args ('dotlrn_external_profile_rel__new','rel_id,user_id,portal_id,theme_id,id,rel_type;dotlrn_external_profile_rel,group_id,creation_user,creation_ip');
 
 select define_function_args ('dotlrn_external_profile_rel__delete','rel_id');
 
Index: openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl,v
diff -u -r1.46 -r1.47
--- openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl	5 Jul 2002 08:13:46 -0000	1.46
+++ openacs-4/packages/dotlrn/tcl/dotlrn-security-procs.tcl	29 Jul 2002 18:45:49 -0000	1.47
@@ -119,7 +119,7 @@
             set portal_id [portal::create \
                 -template_id $template_id \
                 -name "Your dotLRN Workspace" \
-                $user_id
+                $user_id \
             ]
 
             ns_set put $extra_vars portal_id $portal_id
Index: openacs-4/packages/dotlrn/www/one-community-admin.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community-admin.tcl,v
diff -u -r1.20 -r1.21
--- openacs-4/packages/dotlrn/www/one-community-admin.tcl	5 Jul 2002 08:13:46 -0000	1.20
+++ openacs-4/packages/dotlrn/www/one-community-admin.tcl	29 Jul 2002 18:45:49 -0000	1.21
@@ -42,7 +42,7 @@
 db_1row select_community_info {}
 
 # render the admin page
-set rendered_page [dotlrn::render_page -render_style all_in_one $admin_portal_id]
+set rendered_page [dotlrn::render_page -render_style all_in_$admin_portal_id]
 
 set context_bar {Admin}