Index: openacs-4/packages/acs-subsite/www/members/user-batch-add.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/members/user-batch-add.tcl,v
diff -u -N -r1.5.2.1 -r1.5.2.2
--- openacs-4/packages/acs-subsite/www/members/user-batch-add.tcl	10 Sep 2015 08:21:49 -0000	1.5.2.1
+++ openacs-4/packages/acs-subsite/www/members/user-batch-add.tcl	2 Jan 2016 20:57:58 -0000	1.5.2.2
@@ -12,10 +12,16 @@
 subsite::assert_user_may_add_member
 
 set admin_user_id [ad_conn user_id]
-set admin_email [db_string unused "select email from 
-parties where party_id = :admin_user_id"]
-set administration_name [db_string admin_name "select
-first_names || ' ' || last_name from persons where person_id = :admin_user_id"]
+set admin_email [db_string unused {
+    select email
+    from parties
+    where party_id = :admin_user_id
+}]
+set administration_name [db_string admin_name {
+    select first_names || ' ' || last_name
+    from persons
+    where person_id = :admin_user_id
+}]
 
 set context [list [list "./" "Users"] "Notify added user"]
 set system_name [ad_system_name]