From 21cac048139d258d73a12b2aeb17c7f3ffac5b28 Mon Sep 17 00:00:00 2001
From: rillig <rillig@pkgsrc.org>
Date: Mon, 26 Jan 2009 15:44:15 +0000
Subject: Added but disabled a check that tests whether the PKGNAME and the
 package directory match. There is much work to do until this can be enabled.

---
 pkgtools/pkglint/files/pkglint.pl | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/pkgtools/pkglint/files/pkglint.pl b/pkgtools/pkglint/files/pkglint.pl
index 3cffd105ffb..e5160aa9e05 100644
--- a/pkgtools/pkglint/files/pkglint.pl
+++ b/pkgtools/pkglint/files/pkglint.pl
@@ -1,5 +1,5 @@
 #! @PERL@
-# $NetBSD: pkglint.pl,v 1.797 2008/12/21 10:34:59 rillig Exp $
+# $NetBSD: pkglint.pl,v 1.798 2009/01/26 15:44:15 rillig Exp $
 #
 
 # pkglint - static analyzer and checker for pkgsrc packages
@@ -6886,6 +6886,10 @@ sub checkfile_package_Makefile($$) {
 		: (undef, undef, undef, undef);
 	if (defined($effective_pkgname_line)) {
 		$opt_debug_misc and $effective_pkgname_line->log_debug("Effective name=${effective_pkgname} base=${effective_pkgbase} version=${effective_pkgversion}.");
+		# XXX: too many false positives
+		if (false && $pkgpath =~ m"/([^/]+)$" && $effective_pkgbase ne $1) {
+			$effective_pkgname_line->log_warning("Mismatch between PKGNAME ($effective_pkgname) and package directory ($1).");
+		}
 	}
 
 	checkpackage_possible_downgrade();
@@ -7089,6 +7093,7 @@ sub checkfile_patch($) {
 	};
 
 	my $transitions =
+		# [ from state, regex, to state, action ]
 		[   [PST_START, re_patch_rcsid, PST_CENTER, sub() {
 			checkline_rcsid($line, "");
 		}], [PST_START, undef, PST_CENTER, sub() {
-- 
cgit v1.2.3