[pkgsrc/trunk]: pkgsrc/pkgtools/pkglint/files Don't give a warning for incomp...

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

details:   https://anonhg.NetBSD.org/pkgsrc/rev/e5b47652be50
branches:  trunk
changeset: 537263:e5b47652be50
user:      rillig <rillig%pkgsrc.org@localhost>
date:      Sat Jan 05 18:41:02 2008 +0000

description:
Don't give a warning for incomplete RCS tags in patch files, as they
probably will not do any harm.

diffstat:

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

diffs (19 lines):

diff -r 92d81f663304 -r e5b47652be50 pkgtools/pkglint/files/pkglint.pl
--- a/pkgtools/pkglint/files/pkglint.pl Sat Jan 05 18:04:06 2008 +0000
+++ b/pkgtools/pkglint/files/pkglint.pl Sat Jan 05 18:41:02 2008 +0000
@@ -1,5 +1,5 @@
 #! @PERL@
-# $NetBSD: pkglint.pl,v 1.750 2008/01/05 18:04:06 rillig Exp $
+# $NetBSD: pkglint.pl,v 1.751 2008/01/05 18:41:02 rillig Exp $
 #
 
 # pkglint - static analyzer and checker for pkgsrc packages
@@ -7120,7 +7120,7 @@
        my $check_text = sub($) {
                my ($text) = @_;
 
-               if ($text =~ qr"(\$(Author|Date|Header|Id|Locker|Log|Name|RCSfile|Revision|Source|State|$opt_rcsidstring)(?::[^\$]*|\$))") {
+               if ($text =~ qr"(\$(Author|Date|Header|Id|Locker|Log|Name|RCSfile|Revision|Source|State|$opt_rcsidstring)(?::[^\$]*)?\$)") {
                        my ($tag) = ($2);
 
                        if ($text =~ re_patch_uh) {