Index: openacs-4/packages/dotlrn/www/members.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/members.tcl,v
diff -u -r1.13 -r1.14
--- openacs-4/packages/dotlrn/www/members.tcl	28 Apr 2002 16:46:41 -0000	1.13
+++ openacs-4/packages/dotlrn/www/members.tcl	6 May 2002 23:55:02 -0000	1.14
@@ -27,5 +27,5 @@
 set context_bar {{"one-community-admin" Admin} {Manage Members}}
 
 set community_id [dotlrn_community::get_community_id]
-set portal_id [dotlrn_community::get_portal_template_id $community_id]
+set portal_id [dotlrn_community::get_portal_id -community_id $community_id]
 set admin_p [dotlrn::user_can_admin_community_p -user_id [ad_get_user_id] $community_id]