Magic-Mirror/gecko-dev
1
0
Fork 0
mirror of https://github.com/mozilla/gecko-dev.git synced 2024-10-11 04:15:43 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

relax the author regexp for mozilla.org

Browse Source 
make legends horizontal
fix missing '/' in <>
This commit is contained in:
kestes%staff.mail.com 2000-08-30 02:30:23 +00:00
parent 2576491486
commit 66f5d5d555
1 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
webtools/tinderbox2/src/lib/TinderDB/VC_CVS.pm
View File

@ -126,7 +126,7 @@ use TreeData;
use VCDisplay;
$VERSION = ( qw $Revision: 1.4 $ )[1];
$VERSION = ( qw $Revision: 1.5 $ )[1];
@ISA = qw(TinderDB::BasicTxtDB);
@ -326,7 +326,11 @@ sub apply_db_updates {
die("CVS reported time: $time ".gmtime($time).
" which is more then a year away from now.\n")
}
$author =~ m/(\w+)/;
# At mozilla.org authors are email addresses with the "\@"
# replaced by "\%" they have one user with a + in his name
$author =~ m/([a-zA-Z0-9\.\%\+]+)/;
$author = $1;
}
@ -355,12 +359,12 @@ sub status_table_legend {
my ($out)='';
# print all the possible tree states in a cell with the color
$out .= "\t<td align=right valign=top>\n";
$out .= "\t<table $TinderDB::LEGEND_BORDER>\n";
$out .= ("\t\t<thead><tr><td align=center>".
"VC Cell Colors".
"</td><tr></thead>\n");
"</td></tr></thead>\n");
foreach $state (TreeData::get_all_tree_states()) {
my $color = TreeData::TreeState2color($state);
@ -369,6 +373,7 @@ sub status_table_legend {
}
$out .= "\t</table>\n";
$out .= "\t</td>\n";
return ($out);