[pkgsrc/trunk]: pkgsrc/pkgtools/pkglint/files - Made the check for spurious R...

[rillig <rillig%pkgsrc.org@localhost>]

details:   https://anonhg.NetBSD.org/pkgsrc/rev/e7a909fc9dbb
branches:  trunk
changeset: 503844:e7a909fc9dbb
user:      rillig <rillig%pkgsrc.org@localhost>
date:      Thu Dec 01 09:03:00 2005 +0000

description:
- Made the check for spurious RCS tags in patches less strict. Now it finds
  partial tags like $NetBSD:... that don't have a trailing "$".

diffstat:

 pkgtools/pkglint/files/pkglint.pl |  4 ++--
 1 files changed, 2 insertions(+), 2 deletions(-)

diffs (21 lines):

diff -r 39724a2c5884 -r e7a909fc9dbb pkgtools/pkglint/files/pkglint.pl
--- a/pkgtools/pkglint/files/pkglint.pl Thu Dec 01 08:45:37 2005 +0000
+++ b/pkgtools/pkglint/files/pkglint.pl Thu Dec 01 09:03:00 2005 +0000
@@ -11,7 +11,7 @@
 # Freely redistributable.  Absolutely no warranty.
 #
 # From Id: portlint.pl,v 1.64 1998/02/28 02:34:05 itojun Exp
-# $NetBSD: pkglint.pl,v 1.399 2005/12/01 03:12:09 rillig Exp $
+# $NetBSD: pkglint.pl,v 1.400 2005/12/01 09:03:00 rillig Exp $
 #
 # This version contains lots of changes necessary for NetBSD packages
 # done by:
@@ -1507,7 +1507,7 @@
        checkline_rcsid($lines->[0], "");
 
        foreach my $line (@{$lines}[1..$#{$lines}]) {
-               if ($line->text =~ qr"\$(Author|Date|Header|Id|Locker|Log|Name|RCSfile|Revision|Source|State|$opt_rcsidstring)(?::[^\$]*?|)\$") {
+               if ($line->text =~ qr"\$(Author|Date|Header|Id|Locker|Log|Name|RCSfile|Revision|Source|State|$opt_rcsidstring)[:\$]") {
                        my ($tag) = ($1);
                        $line->log_warning("Possible RCS tag \"\$${tag}\$\". Please remove it by reducing the number of context lines using pkgdiff or \"diff -U[210]\".");
                }