From b69a4d8a00c3adb855d103a4fa10c93fd2a447f2 Mon Sep 17 00:00:00 2001
From: "Steinar H. Gunderson" <sesse@rietz>
Date: Thu, 22 Mar 2007 20:07:26 +0000
Subject: [PATCH] Small simplification.

---
 scanlib.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scanlib.pm b/scanlib.pm
index 90b8cc8..0f64165 100644
--- a/scanlib.pm
+++ b/scanlib.pm
@@ -225,7 +225,7 @@ sub scanspooldir() {
 		}
 
 		for my $keyword qw(pending patch help moreinfo unreproducible security upstream sarge-ignore etch-ignore) {
-			$bi->{$keyword} = ($bug->{'keywords'} =~ /\b$keyword\b/) ? 1 : 0;
+			$bi->{$keyword} = grep(/^$keyword$/, @tags);
 		}
 
 		if (length($bug->{'mergedwith'})) {
-- 
2.39.2