From f610c82d41af13e573535b1aa6a3566d729e6036 Mon Sep 17 00:00:00 2001 From: "lpsolit%gmail.com" <> Date: Mon, 12 Mar 2007 22:01:16 +0000 Subject: Bug 373492: Data in data/mining/* is corrupted - Patch by Frédéric Buclin r=mkanat r=gerv a=mkanat MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- collectstats.pl | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/collectstats.pl b/collectstats.pl index 3b6344b37..7bc2b6174 100755 --- a/collectstats.pl +++ b/collectstats.pl @@ -264,8 +264,11 @@ sub get_old_data { $recreate = 1; my @new_cols = ($columns[0], @statuses, @resolutions); if (scalar(@columns) == scalar(@new_cols)) { - my ($removed, $added) = diff_arrays(\@columns, \@new_cols); - last if (!scalar(@$removed) && !scalar(@$added)); + my $identical = 1; + for (0 .. $#columns) { + $identical = 0 if ($columns[$_] ne $new_cols[$_]); + } + last if $identical; } } next unless $recreate; -- cgit v1.2.3-24-g4f1b