details: https://anonhg.NetBSD.org/pkgsrc/rev/06090c80d1b2
branches: trunk
changeset: 494494:06090c80d1b2
user: rillig <rillig%pkgsrc.org@localhost>
date: Wed May 25 00:00:24 2005 +0000
description:
Fixed a regular expression in checklines_direct_tools. Added debugging
output.
diffstat:
pkgtools/pkglint/files/pkglint.pl | 7 +++++--
1 files changed, 5 insertions(+), 2 deletions(-)
diffs (35 lines):
diff -r a2914bd08820 -r 06090c80d1b2 pkgtools/pkglint/files/pkglint.pl
--- a/pkgtools/pkglint/files/pkglint.pl Tue May 24 23:52:02 2005 +0000
+++ b/pkgtools/pkglint/files/pkglint.pl Wed May 25 00:00:24 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.179 2005/05/24 23:50:07 rillig Exp $
+# $NetBSD: pkglint.pl,v 1.180 2005/05/25 00:00:24 rillig Exp $
#
# This version contains lots of changes necessary for NetBSD packages
# done by:
@@ -1250,7 +1250,7 @@
EXTRACT_SUFX
MASTER_SITES
PKGNAME PKGSRC_USE_TOOLS
- SUBST_MESSAGE\\.*
+ SUBST_MESSAGE\\..*
.*_TARGET
USE_TOOLS);
my @ok_shellcmds = qw(
@@ -1267,10 +1267,13 @@
my $tools = join("|", @tools, @cmd_tools);
my $regex_tools = qr"(?:^|\s|/)(${tools})(?:\s|$)";
+ log_info(NO_FILE, NO_LINE_NUMBER, "regex_tools=${regex_tools}");
my $ok_vars = join("|", @ok_vars);
my $regex_ok_vars = qr"^(${ok_vars})$";
+ log_info(NO_FILE, NO_LINE_NUMBER, "regex_ok_vars=${regex_ok_vars}");
my $ok_shellcmds = join("|", @ok_shellcmds);
my $regex_ok_shellcmds = qr"^(${ok_shellcmds})$";
+ log_info(NO_FILE, NO_LINE_NUMBER, "regex_ok_shellcmds=${regex_ok_shellcmds}");
foreach my $line (@{$lines}) {
my $text = $line->text;