Index: openacs-4/packages/dotlrn/www/admin/users-add-to-community.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/users-add-to-community.tcl,v
diff -u -r1.16 -r1.17
--- openacs-4/packages/dotlrn/www/admin/users-add-to-community.tcl	15 May 2007 20:14:25 -0000	1.16
+++ openacs-4/packages/dotlrn/www/admin/users-add-to-community.tcl	1 Nov 2013 21:08:34 -0000	1.17
@@ -75,7 +75,7 @@
         users community_id
 
 
-     if {![empty_string_p $community_id]} {
+     if {$community_id ne ""} {
         db_transaction {
             foreach user $users {
                 dotlrn_community::add_user $community_id $user