From a2a842ad48f4327cd9a62bfcdeded849fafbf2f0 Mon Sep 17 00:00:00 2001
From: "kestes%walrus.com" <kestes%walrus.com>
Date: Fri, 26 Apr 2002 02:05:26 +0000
Subject: [PATCH] updates

---
 .../tinderbox2/src/lib/TinderDB/VC_Bonsai.pm     | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/webtools/tinderbox2/src/lib/TinderDB/VC_Bonsai.pm b/webtools/tinderbox2/src/lib/TinderDB/VC_Bonsai.pm
index 6d6841301f4d..d372c5c0d1ed 100755
--- a/webtools/tinderbox2/src/lib/TinderDB/VC_Bonsai.pm
+++ b/webtools/tinderbox2/src/lib/TinderDB/VC_Bonsai.pm
@@ -94,7 +94,7 @@ use TreeData;
 use VCDisplay;
 
 
-$VERSION = ( qw $Revision: 1.13 $ )[1];
+$VERSION = ( qw $Revision: 1.14 $ )[1];
 
 @ISA = qw(TinderDB::BasicTxtDB);
 
@@ -469,6 +469,11 @@ sub status_table_row {
       }
       $table .= "</table>";
 
+      # Do not display the full mail address in the status column
+
+      my $display_author=$author;
+      $display_author =~ s/\%.*//;
+
       # we display the list of names in 'teletype font' so that the
       # names do not bunch together. It seems to make a difference if
       # there is a <cr> between each link or not, but it does make a
@@ -476,7 +481,7 @@ sub status_table_row {
       # the group of links.
 
       my (%popup_args) = (
-                          "linktxt" => "\t\t<tt>$author</tt>",
+                          "linktxt" => "\t\t<tt>$display_author</tt>",
                           
                           "windowtxt" => $table,
                           "windowtitle" => ("$VC_NAME Info ".
@@ -490,11 +495,6 @@ sub status_table_row {
       my $mailto_author=$author;
       $mailto_author =~ s/\%/\@/;
 
-      # Do not display the full mail address in the status column
-
-      my $display_author=$author;
-      $display_author =~ s/\%.*//;
-
       # If you have a VCDisplay implementation you should make the
       # link point to its query method otherwise you want a 'mailto:'
       # link
@@ -519,7 +519,7 @@ sub status_table_row {
                            'tree' => $tree,
                            'mindate' => $mindate,
                            'maxdate' => $maxdate,
-                           'who' => $display_author,
+                           'who' => $author,
                            
                            %popup_args,
                              );