Bommels05/Mozilla
Bommels05/Mozilla
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

If we delete too many duplicate treestates then we loose information

Browse Source 
when the database is trimmed.

add more output to the CVS error message for close failures.


git-svn-id: svn://10.0.0.236/trunk@81326 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
kestes%staff.mail.com 2000-10-17 23:55:25 +00:00
parent b48fa04f20
commit b68dfdcc14
1 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
mozilla/webtools/tinderbox2/src/lib/TinderDB/VC_CVS.pm
View File

@ -126,7 +126,7 @@ use TreeData;
use VCDisplay;
$VERSION = ( qw $Revision: 1.7 $ )[1];
$VERSION = ( qw $Revision: 1.8 $ )[1];
@ISA = qw(TinderDB::BasicTxtDB);
@ -175,7 +175,13 @@ sub apply_db_updates {
# Purge duplicate 'treestate' entries to keep the DB size down.
# Data::Dumper takes a long time and this really helps speed things up.
# If we delete too many duplicates then we loose information when
# the database is trimmed. We need to keep some duplicates arround
# for debuging and for "redundancy". Only delete duplicates during
# the list hour. Notice we are still removing 90% of the duplicates.
( ($main::$TIME - $time) < $SECONDS_PER_HOUR ) &&
($DATABASE{$tree}{$time}{'treestate'}) &&
($DATABASE{$tree}{$time}{'treestate'} eq $tree_state) &&
delete $DATABASE{$tree}{$time}{'treestate'};
@ -246,7 +252,7 @@ sub apply_db_updates {
my @cvs_output = <CVS>;
close(CVS) ||
die("Could not close exec: '@cmd': $!\n");
die("Could not close exec: '@cmd': \$?: $? : \$\!: $!\n");
($?) &&
die("Could not cmd: '@cmd' exited with error: $?\n");