X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=bugdiff;h=787371915a215cc4088335298387b2d83ddfaba7;hp=677877e5ebe5f9838ea38ca9c5e5cfc26069d7fc;hb=b466d60ef751700a50478b94761418d5a5ef55c1;hpb=d5a0b74a3ddd8ad47fb594e890dfd0f454627655

diff --git a/bugdiff b/bugdiff
index 677877e..7873719 100755
--- a/bugdiff
+++ b/bugdiff
@@ -95,16 +95,16 @@ ShowUsage if ($opt_h or ($#ARGV != 1));
 ShowVersion if ($opt_V);
 $html=1 if ($opt_H);
 
-&readstatus($ARGV[0]);
+scanlib::readstatus($ARGV[0]);
 %oldbugs=%packagelist;
 %packagelist=();
 
-&readstatus($ARGV[1]);
+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++;