Index: openacs-4/packages/dotlrn/www/community-applets.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/community-applets.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/dotlrn/www/community-applets.tcl	10 Jan 2002 00:11:38 -0000	1.4
+++ openacs-4/packages/dotlrn/www/community-applets.tcl	10 Jan 2002 19:30:18 -0000	1.5
@@ -1,20 +1,18 @@
-
-
 ad_page_contract {
     Community Applets
     
     @author Ben Adida (ben@openforce.net)
+    @author yon (yon@openforce.net)
     @creation-date 2001-10-05
-} {
+    @version $Id$
+} -query {
+} -properties {
 }
 
 set community_id [dotlrn_community::get_community_id]
 
 set user_id [ad_conn user_id]
 
-# Load some community type info
-db_1row select_community_info {}
-
 # Get active applets
 set list_of_active_applets [dotlrn_community::list_applets -community_id $community_id]
 
@@ -24,7 +22,6 @@
     template::multirow append active_applets $applet_key [dotlrn_community::applet_call $applet_key GetPrettyName]
 }
 
-
 # List all applets
 set list_of_applets [dotlrn_community::list_applets]
 
@@ -36,6 +33,4 @@
     }
 }
 
-set context_bar {{one-community-admin Admin} Applets}
-
 ad_return_template