| @@ -1,15 +1,15 @@ | | | @@ -1,15 +1,15 @@ |
| 1 | #! @PERL@ | | 1 | #! @PERL@ |
| 2 | # $NetBSD: pkglint.pl,v 1.760 2008/01/28 09:25:52 rillig Exp $ | | 2 | # $NetBSD: pkglint.pl,v 1.761 2008/01/31 13:20:56 rillig Exp $ |
| 3 | # | | 3 | # |
| 4 | | | 4 | |
| 5 | # pkglint - static analyzer and checker for pkgsrc packages | | 5 | # pkglint - static analyzer and checker for pkgsrc packages |
| 6 | # | | 6 | # |
| 7 | # Written by: | | 7 | # Written by: |
| 8 | # Roland Illig <rillig@NetBSD.org> | | 8 | # Roland Illig <rillig@NetBSD.org> |
| 9 | # | | 9 | # |
| 10 | # Based on work by: | | 10 | # Based on work by: |
| 11 | # Hubert Feyrer <hubertf@NetBSD.org> | | 11 | # Hubert Feyrer <hubertf@NetBSD.org> |
| 12 | # Thorsten Frueauf <frueauf@NetBSD.org> | | 12 | # Thorsten Frueauf <frueauf@NetBSD.org> |
| 13 | # Thomas Klausner <wiz@NetBSD.org> | | 13 | # Thomas Klausner <wiz@NetBSD.org> |
| 14 | # and others. | | 14 | # and others. |
| 15 | # | | 15 | # |
| @@ -8303,26 +8303,28 @@ sub checkitem($) { | | | @@ -8303,26 +8303,28 @@ sub checkitem($) { |
| 8303 | } | | 8303 | } |
| 8304 | } | | 8304 | } |
| 8305 | if (!defined($cwd_pkgsrcdir) && defined($cur_pkgsrcdir)) { | | 8305 | if (!defined($cwd_pkgsrcdir) && defined($cur_pkgsrcdir)) { |
| 8306 | $cwd_pkgsrcdir = "${current_dir}/${cur_pkgsrcdir}"; | | 8306 | $cwd_pkgsrcdir = "${current_dir}/${cur_pkgsrcdir}"; |
| 8307 | } | | 8307 | } |
| 8308 | | | 8308 | |
| 8309 | if (!defined($cwd_pkgsrcdir)) { | | 8309 | if (!defined($cwd_pkgsrcdir)) { |
| 8310 | log_error($item, NO_LINE_NUMBER, "Cannot determine the pkgsrc root directory."); | | 8310 | log_error($item, NO_LINE_NUMBER, "Cannot determine the pkgsrc root directory."); |
| 8311 | return; | | 8311 | return; |
| 8312 | } | | 8312 | } |
| 8313 | | | 8313 | |
| 8314 | check_pkglint_version(); # (needs $cwd_pkgsrcdir) | | 8314 | check_pkglint_version(); # (needs $cwd_pkgsrcdir) |
| 8315 | | | 8315 | |
| | | 8316 | return if $is_dir && is_emptydir($item); |
| | | 8317 | |
| 8316 | if ($is_dir) { | | 8318 | if ($is_dir) { |
| 8317 | checkdir_CVS($item); | | 8319 | checkdir_CVS($item); |
| 8318 | } | | 8320 | } |
| 8319 | | | 8321 | |
| 8320 | if ($is_reg) { | | 8322 | if ($is_reg) { |
| 8321 | checkfile($item); | | 8323 | checkfile($item); |
| 8322 | | | 8324 | |
| 8323 | } elsif (!defined($cur_pkgsrcdir)) { | | 8325 | } elsif (!defined($cur_pkgsrcdir)) { |
| 8324 | log_error($item, NO_LINES, "Cannot check directories outside a pkgsrc tree."); | | 8326 | log_error($item, NO_LINES, "Cannot check directories outside a pkgsrc tree."); |
| 8325 | | | 8327 | |
| 8326 | } elsif ($cur_pkgsrcdir eq "../..") { | | 8328 | } elsif ($cur_pkgsrcdir eq "../..") { |
| 8327 | checkdir_package(); | | 8329 | checkdir_package(); |
| 8328 | | | 8330 | |