Index: openacs.org-dev/packages/bug-tracker/www/bug.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/bug-tracker/www/bug.tcl,v
diff -u -r1.5 -r1.6
--- openacs.org-dev/packages/bug-tracker/www/bug.tcl	20 Jan 2003 14:08:08 -0000	1.5
+++ openacs.org-dev/packages/bug-tracker/www/bug.tcl	2 Nov 2003 00:08:45 -0000	1.6
@@ -349,6 +349,13 @@
         and    sc.severity_id = b.severity
         and    submitter.user_id = o.creation_user
     } -column_array bug
+
+
+if {[string equal [ad_conn user_id] 0]} {
+    set bug(submitter_email) "[string range $bug(submitter_email) 0 [string first @ $bug(submitter_email)]] ..."
+    set bug(assignee_email) "[string range $bug(assignee_email) 0 [string first @ $bug(assignee_email)]] ..."
+}
+
         
     switch -- $mode {
         resolve {
Index: openacs.org-dev/packages/bug-tracker/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/bug-tracker/www/index.tcl,v
diff -u -r1.2 -r1.3
--- openacs.org-dev/packages/bug-tracker/www/index.tcl	4 Dec 2002 16:13:28 -0000	1.2
+++ openacs.org-dev/packages/bug-tracker/www/index.tcl	2 Nov 2003 00:08:45 -0000	1.3
@@ -153,7 +153,7 @@
     and    [join $where_clauses " and "]
     order  by $order_by_clause
 " {
-    set description_short [string_truncate -len $truncate_len -format $desc_format $description]
+    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]
Index: openacs.org-dev/packages/bug-tracker/www/patch-list.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/bug-tracker/www/patch-list.adp,v
diff -u -r1.2 -r1.3
--- openacs.org-dev/packages/bug-tracker/www/patch-list.adp	14 Jan 2003 11:58:25 -0000	1.2
+++ openacs.org-dev/packages/bug-tracker/www/patch-list.adp	2 Nov 2003 00:08:45 -0000	1.3
@@ -20,17 +20,19 @@
 <table>
 <if @patch_list:rowcount@ not eq 0>
 <tr>
+  <th>Submitter</th>
   <th>Patch Summary</th>
   <th>Status</th>
   <th>Creation Date</th>
 </tr>
 </if>
 
 <multiple name="patch_list">
-<tr>
+<if @patch_list.rownum@ odd><tr class="odd"></if><else><tr class="even"></else>
+  <td>@patch_list.submitter@</td>
   <td align="left"><a href="patch?patch_number=@patch_list.patch_number@">@patch_list.summary@</a></td>
   <td align="center">@patch_list.status@</td>
-  <td align="center">@patch_list.creation_date_pretty@</td>
+  <td align="right">@patch_list.creation_date_pretty@</td>
 </tr>
 </multiple>
 </table>
Index: openacs.org-dev/packages/bug-tracker/www/patch-list.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs.org-dev/packages/bug-tracker/www/patch-list.tcl,v
diff -u -r1.2 -r1.3
--- openacs.org-dev/packages/bug-tracker/www/patch-list.tcl	14 Jan 2003 11:58:25 -0000	1.2
+++ openacs.org-dev/packages/bug-tracker/www/patch-list.tcl	2 Nov 2003 00:08:45 -0000	1.3
@@ -112,12 +112,18 @@
     select bt_patches.patch_number,
            bt_patches.summary,
            bt_patches.status,
-           to_char(acs_objects.creation_date, 'fmMM/DDfm/YYYY') as creation_date_pretty
+           to_char(acs_objects.creation_date, 'fmMM/DDfm/YYYY') as creation_date_pretty,
+           u.first_names || ' ' || u.last_name as submitter_name,
+           u.user_id as submitter
     from   bt_patches,
-           acs_objects
+           acs_objects, 
+           dir_all_users u
     where  bt_patches.patch_id = acs_objects.object_id
+           and u.user_id = acs_objects.creation_user
            and $where_clause
     order  by acs_objects.creation_date desc
-"
+" { 
+    set submitter [acs_community_member_link -user_id $submitter -label $submitter_name]
+}
 
 ad_return_template