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.145 -r1.146
--- openacs-4/packages/dotlrn/tcl/community-procs.tcl	13 Jun 2002 04:35:59 -0000	1.145
+++ openacs-4/packages/dotlrn/tcl/community-procs.tcl	13 Jun 2002 19:12:19 -0000	1.146
@@ -1983,23 +1983,16 @@
     } {
         ussets an attribute of this community
     } {
+        if {[empty_string_p $community_id]} {
+            set community_id [get_community_id]
+        }
+
         # this is serious, we are trying to unset an attribute that doesn't
         # exist
         set attribute_id [get_attribute_id -attribute_name $attribute_name]
         if {[empty_string_p $attribute_id]} {
             error "dotlrn_community::set_attribute: invalid attribute $attribute_name"
         }
-
-        # we don't accept empty values (essentially, we are making the
-        # acs_attribute_values.attr_value not null, which it is not in the db).
-        if {[empty_string_p $attribute_value]} {
-            return
-        }
-
-        if {[empty_string_p $community_id]} {
-            set community_id [get_community_id]
-        }
-
         # remove the row
         db_dml delete_attribute_value {}