Index: openacs-4/packages/bug-tracker/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/index.tcl,v
diff -u -r1.10 -r1.11
--- openacs-4/packages/bug-tracker/www/index.tcl	11 Sep 2002 14:03:25 -0000	1.10
+++ openacs-4/packages/bug-tracker/www/index.tcl	20 Sep 2002 13:40:46 -0000	1.11
@@ -153,7 +153,8 @@
     and    [join $where_clauses " and "]
     order  by $order_by_clause
 " {
-    set description_short [string_truncate -len $truncate_len [bug_tracker::bug_convert_comment_to_text -comment $description -format $desc_format]]
+    set description_short [string_truncate -len $truncate_len -format $desc_format $description]
+    set summary [ad_quotehtml $summary]
     set submitter_url [acs_community_member_url -user_id $submitter_user_id]
     set status_pretty [bug_tracker::status_pretty $status]
     set resolution_pretty [bug_tracker::resolution_pretty $resolution]
@@ -282,7 +283,7 @@
 }
 
 db_multirow -extend { name_url stat_name } -append stats stats_by_component {
-    select coalesce('com/'||c.url_name||'/', to_char(c.component_id,'99999999')) as unique_id,
+    select coalesce('com/'||c.url_name||'/', trim(to_char(c.component_id,'99999999'))) as unique_id,
            c.component_name as name,
            count(b.bug_id) as num_bugs
     from   bt_bugs b left join