Index: openacs-4/packages/bug-tracker/www/send-summary-email.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/send-summary-email.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/bug-tracker/www/send-summary-email.tcl	6 Aug 2014 16:25:20 -0000	1.3
+++ openacs-4/packages/bug-tracker/www/send-summary-email.tcl	23 Jun 2015 16:05:06 -0000	1.4
@@ -81,12 +81,28 @@
     # TODO: currently hardcoded html
     # need to convert to something more configurable
     
-    set html_content "<p><b>[_ bug-tracker.send_summary_email_header]</b></p><table cellpadding=3><tr><td style=\"border:1px solid \#ddd;\">[bug_tracker::conn Bug] [_ bug-tracker.number_symbol]</td><td style=\"border:1px solid \#ddd;\">[_ bug-tracker.Summary]</td><td style=\"border:1px solid \#ddd;\">[_ bug-tracker.State]</td><td style=\"border:1px solid \#ddd;\">[_ bug-tracker.Assigned_To]</td><td style=\"border:1px solid \#ddd;\">Priority</td></tr>"
+    set html_content [subst {
+	<p><b>[_ bug-tracker.send_summary_email_header]</b></p>
+	<table cellpadding="3"><tr>
+	<td style="border:1px solid #ddd;">[bug_tracker::conn Bug] [_ bug-tracker.number_symbol]</td>
+	<td style="border:1px solid #ddd;">[_ bug-tracker.Summary]</td>
+	<td style="border:1px solid #ddd;">[_ bug-tracker.State]</td>
+	<td style="border:1px solid #ddd;">[_ bug-tracker.Assigned_To]</td>
+	<td style="border:1px solid #ddd;">Priority</td>
+	</tr>
+    }]
 
     db_foreach get_bugs "" {
         if {$cat_keyword_id == $p_keyword_id} {
             set bug_url [export_vars -base "[ad_url][ad_conn package_url]bug" {bug_number}]
-            append html_content "<tr><td style=\"border:1px solid \#ddd;\">$bug_number</td><td style=\"border:1px solid \#ddd;\"><a href=\"$bug_url\">$summary</a></td><td style=\"border:1px solid \#ddd;\">$pretty_state</td><td style=\"border:1px solid \#ddd;\">$assignee_first_names $assignee_last_name</td><td style=\"border:1px solid \#ddd;\">$heading</td></tr>"
+            append html_content [subst {<tr>
+		<td style="border:1px solid #ddd;">$bug_number</td>
+		<td style="border:1px solid #ddd;"><a href="[ns_quotehtml $bug_url]">$summary</a></td>
+		<td style="border:1px solid #ddd;">$pretty_state</td>
+		<td style="border:1px solid #ddd;">$assignee_first_names $assignee_last_name</td>
+		<td style="border:1px solid #ddd;">$heading</td>
+		</tr>
+	    }]
         }
     }
     append html_content "</table>"