diff options
author | rillig <rillig> | 2005-09-02 10:42:18 +0000 |
---|---|---|
committer | rillig <rillig> | 2005-09-02 10:42:18 +0000 |
commit | e2980e722928819456f266606691ff7d039a56ab (patch) | |
tree | 3f5951530d2ea8e918ced09738e1a1fed67e58f8 /pkgtools/pkglint | |
parent | c54516f3e7a7b9b4dbe365a2b1a6db56c32504c2 (diff) | |
download | pkgsrc-e2980e722928819456f266606691ff7d039a56ab.tar.gz |
In the diagnostics, "../../" path components that are not at the
beginning are stripped to make the output less verbose. The beginning is
needed to have a reference from which package the file is included, so
it is not stripped.
Diffstat (limited to 'pkgtools/pkglint')
-rw-r--r-- | pkgtools/pkglint/files/pkglint.pl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/pkgtools/pkglint/files/pkglint.pl b/pkgtools/pkglint/files/pkglint.pl index e0c8d425496..9b9276a09f1 100644 --- a/pkgtools/pkglint/files/pkglint.pl +++ b/pkgtools/pkglint/files/pkglint.pl @@ -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.266 2005/09/02 10:11:24 rillig Exp $ +# $NetBSD: pkglint.pl,v 1.267 2005/09/02 10:42:18 rillig Exp $ # # This version contains lots of changes necessary for NetBSD packages # done by: @@ -117,6 +117,10 @@ sub log_message($$$$$) { $file =~ s,^(?:\./)+,,; $file =~ s,/(?:\./)+,/,g; $file =~ s,/+,/,g; + + # strip intermediate "../.." path components + while ($file =~ s,/[^.][^/]*/[^.][^/]*/\.\./\.\./,/,) { + } } $text = ""; |