diff options
| author | rillig <rillig@pkgsrc.org> | 2006-06-18 08:20:19 +0000 |
|---|---|---|
| committer | rillig <rillig@pkgsrc.org> | 2006-06-18 08:20:19 +0000 |
| commit | 097e1b83711dd7b7b51a7ca5b0d69458307d983a (patch) | |
| tree | 644cf269c495abc07aff388ee146863246ae73d6 /pkgtools | |
| parent | 9f833e47e8f4518223b37885c7264333e6e521ee (diff) | |
| download | pkgsrc-097e1b83711dd7b7b51a7ca5b0d69458307d983a.tar.gz | |
Pathnames should generally not start with a slash.
Diffstat (limited to 'pkgtools')
| -rw-r--r-- | pkgtools/pkglint/files/pkglint.pl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/pkgtools/pkglint/files/pkglint.pl b/pkgtools/pkglint/files/pkglint.pl index 22d1227f6f4..4612c7015bd 100644 --- a/pkgtools/pkglint/files/pkglint.pl +++ b/pkgtools/pkglint/files/pkglint.pl @@ -1,5 +1,5 @@ #! @PERL@ -# $NetBSD: pkglint.pl,v 1.631 2006/06/18 01:08:08 rillig Exp $ +# $NetBSD: pkglint.pl,v 1.632 2006/06/18 08:20:19 rillig Exp $ # # pkglint - static analyzer and checker for pkgsrc packages @@ -4195,11 +4195,17 @@ sub checkline_mk_vartype_basic($$$$$$$) { if ($value_novar !~ qr"^[-0-9A-Za-z._~+%*?/\[\]]*$") { $line->log_warning("\"${value}\" is not a valid pathname mask."); } + if ($value =~ qr"^/") { + $line->log_warning("Found absolute pathname: ${value}."); + } } elsif ($type eq "Pathname") { if ($value_novar !~ qr"^[-0-9A-Za-z._~+%/]*$") { $line->log_warning("\"${value}\" is not a valid pathname."); } + if ($value =~ qr"^/") { + $line->log_warning("Found absolute pathname: ${value}."); + } } elsif ($type eq "Perl5Packlist") { if ($value ne $value_novar) { |