[lintian] 05/06: checks/fields: Escape dots in regexps

[Jakub Wilk <jwilk@moszumanska.debian.org>]

This is an automated email from the git hooks/post-receive script.

jwilk pushed a commit to branch master
in repository lintian.

commit 74ef5d0a1b17dcf289bd4d500fb1a10c9870d68a
Author: Jakub Wilk <jwilk@debian.org>
Date:   Tue Aug 16 11:51:52 2016 +0200

    checks/fields: Escape dots in regexps
---
 checks/fields.pm | 4 ++--
 debian/changelog | 3 ++-
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/checks/fields.pm b/checks/fields.pm
index d1de3e5..fa81680 100644
--- a/checks/fields.pm
+++ b/checks/fields.pm
@@ -144,12 +144,12 @@ my %VCS_CANONIFY = (
     },
     cvs      => sub {
         if (
-            $_[0] =~ s{\@(?:cvs.alioth|anonscm)\.debian\.org:/cvsroot/}
+            $_[0] =~ s{\@(?:cvs\.alioth|anonscm)\.debian\.org:/cvsroot/}
                       {\@anonscm.debian.org:/cvs/}
           ) {
             $_[1] = 'vcs-field-bitrotted';
         }
-        $_[0] =~ s{\@cvs.alioth.debian.org:/cvs/}{\@anonscm.debian.org:/cvs/};
+        $_[0] =~ s{\@\Qcvs.alioth.debian.org:/cvs/}{\@anonscm.debian.org:/cvs/};
     },
     arch     => sub {
         $_[0] =~ s{https?\Q://arch.debian.org/arch/\E}
diff --git a/debian/changelog b/debian/changelog
index fa28840..96aceee 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -8,8 +8,9 @@ lintian (2.5.47) UNRELEASED; urgency=medium
     + [JW] Fix typo.
   * checks/duplicate-files.desc:
     + [JW] Fix typo.
-  * checks/fields.desc:
+  * checks/fields.{desc,pm}:
     + [JW] Fix typos.
+    + [JW] Escape dots in some regexps.
   * checks/files.desc:
     + [JW] Fix typos.
   * checks/java.desc:

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/lintian/lintian.git