Index: openacs-4/packages/dotlrn/tcl/community-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	9 Oct 2001 15:49:17 -0000	1.8
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	12 Oct 2001 14:49:45 -0000	1.9
@@ -125,7 +125,7 @@
 	    set rel_id [relation_add -member_state approved $rel_type $community_id $user_id]
 	    
 	    # Set up a portal page for that user
-	    set page_id [portal::create_portal $user_id]
+	    set page_id [portal::create $user_id]
 	    
 	    # Insert the membership
 	    db_dml insert_membership {}
@@ -152,7 +152,7 @@
 	    db_dml delete_membership {}
 	    
 	    # Remove the page
-	    portal::delete_portal $page_id
+	    portal::delete $page_id
 	    
 	    # Remove it
 	    relation_remove $rel_id
Index: openacs-4/packages/dotlrn/www/one-community.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/one-community.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/dotlrn/www/one-community.tcl	9 Oct 2001 14:35:58 -0000	1.3
+++ openacs-4/packages/dotlrn/www/one-community.tcl	12 Oct 2001 14:48:54 -0000	1.4
@@ -31,7 +31,7 @@
     # Pull out the NPP page ID and render it!
     set page_id [dotlrn_community::get_page_id $community_id $user_id]
 
-    set rendered_page [portal::render_portal $page_id]
+    set rendered_page [portal::render $page_id]
 
     set context_bar {View}