Index: openacs-4/packages/acs-subsite/www/pvt/alerts.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/pvt/alerts.tcl,v
diff -u -N -r1.6 -r1.7
--- openacs-4/packages/acs-subsite/www/pvt/alerts.tcl	27 Oct 2014 16:40:00 -0000	1.6
+++ openacs-4/packages/acs-subsite/www/pvt/alerts.tcl	7 Aug 2017 23:47:59 -0000	1.7
@@ -14,7 +14,11 @@
 
 set user_id [ad_conn user_id]
 
-db_1row name_get "select first_names, last_name, email, url from persons, parties where persons.person_id = parties.party_id and party_id =:user_id" -bind [ad_tcl_vars_to_ns_set user_id]
+db_1row name_get {
+    select first_names, last_name, email, url
+    from persons, parties
+    where persons.person_id = parties.party_id and party_id =:user_id
+} -bind [ad_tcl_vars_to_ns_set user_id]
 
 if { $first_names ne "" || $last_name ne "" } {
     set full_name "$first_names $last_name"
@@ -125,4 +129,9 @@
 
 db_release_unused_handles
 
-ad_return_template
\ No newline at end of file
+ad_return_template
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: