[pkgsrc/trunk]: pkgsrc/pkgtools/pkglint/files - Simplified checking for the R...

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

details:   https://anonhg.NetBSD.org/pkgsrc/rev/1c7e97945eab
branches:  trunk
changeset: 508450:1c7e97945eab
user:      rillig <rillig%pkgsrc.org@localhost>
date:      Sun Feb 19 16:28:19 2006 +0000

description:
- Simplified checking for the RCS Id in the first line of patches.

diffstat:

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

diffs (30 lines):

diff -r 209590a07f0b -r 1c7e97945eab pkgtools/pkglint/files/pkglint.pl
--- a/pkgtools/pkglint/files/pkglint.pl Sun Feb 19 16:12:02 2006 +0000
+++ b/pkgtools/pkglint/files/pkglint.pl Sun Feb 19 16:28:19 2006 +0000
@@ -1,5 +1,5 @@
 #! @PERL@
-# $NetBSD: pkglint.pl,v 1.528 2006/02/19 15:28:51 rillig Exp $
+# $NetBSD: pkglint.pl,v 1.529 2006/02/19 16:28:19 rillig Exp $
 #
 
 # pkglint - static analyzer and checker for pkgsrc packages
@@ -4060,7 +4060,6 @@
        # style: [c] = context diff, [u] = unified diff
        # scope: [f] = file, [h] = hunk, [l] = line
        # action: [d] = delete, [m] = modify, [a] = add, [c] = context
-       use constant re_patch_rcsid     => qr"^(\$.*\$)$";
        use constant re_patch_text      => qr"^(.+)$";
        use constant re_patch_empty     => qr"^$";
        use constant re_patch_cfd       => qr"^\*\*\*\s(\S+)(.*)$";
@@ -4170,10 +4169,8 @@
        };
 
        my $transitions =
-               [   [PST_START, re_patch_rcsid, PST_CENTER, sub() {
+               [   [PST_START, undef, PST_CENTER, sub() {
                        checkline_rcsid($line, "");
-               }], [PST_START, undef, PST_CENTER, sub() {
-                       $line->log_error("CVS Id expected.");
                }], [PST_CENTER, re_patch_empty, PST_TEXT, sub() {
                        #
                }], [PST_TEXT, re_patch_cfd, PST_CFA, sub() {