Index: openacs-4/packages/dotlrn/www/members-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/members-chunk.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/dotlrn/www/members-chunk.tcl 19 Jan 2002 22:54:20 -0000 1.1 +++ openacs-4/packages/dotlrn/www/members-chunk.tcl 20 Jan 2002 19:17:39 -0000 1.2 @@ -6,13 +6,18 @@ @version $Id$ } -query { } -properties { + users:multirow } set community_id [dotlrn_community::get_community_id] # Permissions dotlrn::require_user_admin_community $community_id +if {![exists_and_not_null referer]} { + set referer "one-community-admin" +} + # Get all users for this community, including role set list_of_users [dotlrn_community::list_users $community_id]