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 -r1.5 -r1.6
--- openacs-4/packages/acs-subsite/www/members/user-batch-add.tcl	27 Oct 2014 16:39:59 -0000	1.5
+++ openacs-4/packages/acs-subsite/www/members/user-batch-add.tcl	7 Aug 2017 23:47:59 -0000	1.6
@@ -12,14 +12,26 @@
 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]
 set export_vars [export_vars -form {email first_names last_name user_id}]
 set system_url [parameter::get -package_id [ad_acs_kernel_id] -parameter SystemURL -default ""].
 
 ad_return_template
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: