Oops, a bug there in the space-to-array conversion.

[bugscan.git] / bugdiff

diff --git a/bugdiff b/bugdiff
index 33cc562fe6e8ae317b731362382336982730429c..787371915a215cc4088335298387b2d83ddfaba7 100755 (executable)
--- a/bugdiff
+++ b/bugdiff
@@ -103,8 +103,8 @@ scanlib::readstatus($ARGV[1]);
 
 $closed=0;
 for $p (keys %oldbugs) {
-       for $b (split(/ /, $oldbugs{$p})) {
-               if (not ($packagelist{$p} =~ m/\b$b\b/)) {
+       for $b (@{$oldbugs{$p}}) {
+               if (scalar grep { $_ == $b } @{$packagelist{$p}} == 0) { 
                        $removed{$p} .= "$b ";
                        $closed++;
                }
@@ -113,7 +113,7 @@ for $p (keys %oldbugs) {
 
 $opened=0;
 for $p (keys %packagelist) {
-       for $b (split(/ /, $packagelist{$p})) {
+       for $b (@{$packagelist{$p}}) {
                if (not ($oldbugs{$p} =~ m/\b$b\b/)) {
                        $new{$p} .= "$b ";
                        $opened++;