From a2d940fb015bf54a6b304f4439bd722bf4078e56 Mon Sep 17 00:00:00 2001 From: "lpsolit%gmail.com" <> Date: Mon, 12 Mar 2007 22:04:11 +0000 Subject: [PATCH] =?utf8?q?Bug=20373492:=20Data=20in=20data/mining/*=20is?= =?utf8?q?=20corrupted=20-=20Patch=20by=20Fr=C3=83=C2=A9d=C3=83=C2=A9ric?= =?utf8?q?=20Buclin=20=20r=3Dmkanat=20r=3Dgerv=20a=3Dmk?= =?utf8?q?anat?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- collectstats.pl | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/collectstats.pl b/collectstats.pl index 3b6344b377..7bc2b6174d 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; -- 2.47.2