From c8ade4d646e6eeb2386aaaa852f2d1c0f1ef1653 Mon Sep 17 00:00:00 2001
From: "lpsolit%gmail.com" <>
Date: Wed, 11 Jul 2007 22:30:05 +0000
Subject: Bug 340350: 009bugwords.t barewords detection is imperfect - Patch by
 Frédéric Buclin <LpSolit@gmail.com> r=Colin a=LpSolit
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 t/009bugwords.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 't')

diff --git a/t/009bugwords.t b/t/009bugwords.t
index bf3d91f26..a4962f223 100644
--- a/t/009bugwords.t
+++ b/t/009bugwords.t
@@ -68,7 +68,7 @@ foreach my $file (@testitems) {
         my $lineno = scalar(@lineno) + 1;
     
         # "a bug", "bug", "bugs"
-        if (grep /(a?[\s>]bugs?[\s.:;])/i, $text) {
+        if (grep /(a?[\s>]bugs?[\s.:;,])/i, $text) {
             # Exclude variable assignment.
             unless (grep /bugs =/, $text) {
                 push(@errors, [$lineno, $text]);
-- 
cgit v1.2.3-24-g4f1b