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.6 -r1.7 --- openacs-4/packages/dotlrn/www/one-community-admin.tcl 28 Nov 2001 00:11:48 -0000 1.6 +++ openacs-4/packages/dotlrn/www/one-community-admin.tcl 10 Jan 2002 19:30:18 -0000 1.7 @@ -1,18 +1,19 @@ - ad_page_contract { Displays single dotLRN community page for admin @author Ben Adida (ben@openforce.net) + @author yon (yon@openforce.net) @creation-date 2001-11-27 -} { + @version $Id$ +} -query { +} -properties { } set community_id [dotlrn_community::get_community_id] # Permissions dotlrn::require_user_admin_community $community_id -# Get information about that class db_1row select_community_info {} # Get all users for this community, including role