Index: openacs-4/packages/dotlrn-admin/www/admin/users-add-to-community.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-admin/www/admin/users-add-to-community.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/dotlrn-admin/www/admin/users-add-to-community.tcl	20 Aug 2004 14:44:22 -0000	1.1
+++ openacs-4/packages/dotlrn-admin/www/admin/users-add-to-community.tcl	28 Jun 2015 12:09:34 -0000	1.2
@@ -70,7 +70,7 @@
     form get_values select_community \
         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
@@ -87,8 +87,8 @@
             }
         }
 
-        set subject "You have been added to the \"$community_name\" community at [ad_parameter -package_id [ad_acs_kernel_id] SystemURL]"
-        set message "To visit the community's home page, point your browser at [ad_parameter -package_id [ad_acs_kernel_id] SystemURL],
+        set subject "You have been added to the \"$community_name\" community at [parameter::get -package_id [ad_acs_kernel_id] -parameter SystemURL]"
+        set message "To visit the community's home page, point your browser at [parameter::get -package_id [ad_acs_kernel_id] -parameter SystemURL],
 log in, and click on the \"$community_name\" link in the \"Groups\" portlet.
 "