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.144 -r1.145
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	7 Jun 2002 04:47:38 -0000	1.144
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	13 Jun 2002 04:35:59 -0000	1.145
@@ -1277,6 +1277,15 @@
         return [db_string select_community_description {} -default ""]
     }
 
+    ad_proc -public set_community_description {
+        {-community_id:required}
+        {-description:required}
+    } {
+        update the description for a community
+    } {
+        db_dml update_community_description {}
+    }
+
     ad_proc -public get_community_key {
         {-community_id:required}
     } {
@@ -1879,6 +1888,10 @@
         return [db_list_of_lists select_available_attributes {}]
     }
 
+    ad_proc -private get_available_attributes_flush {} {
+        util_memoize_flush {dotlrn_community::get_available_attributes_not_cached}
+    }
+
     ad_proc -public get_attributes {
         {-community_id ""}
     } {