diff options
Diffstat (limited to 'ports-mgmt')
-rw-r--r-- | ports-mgmt/portlint/Makefile | 2 | ||||
-rw-r--r-- | ports-mgmt/portlint/src/portlint.pl | 40 |
2 files changed, 39 insertions, 3 deletions
diff --git a/ports-mgmt/portlint/Makefile b/ports-mgmt/portlint/Makefile index 1496474..6757d65 100644 --- a/ports-mgmt/portlint/Makefile +++ b/ports-mgmt/portlint/Makefile @@ -8,7 +8,7 @@ # PORTNAME= portlint -PORTVERSION= 2.7.0 +PORTVERSION= 2.7.1 CATEGORIES= devel MASTER_SITES= # none DISTFILES= # none diff --git a/ports-mgmt/portlint/src/portlint.pl b/ports-mgmt/portlint/src/portlint.pl index f906f23..e6d6c7d 100644 --- a/ports-mgmt/portlint/src/portlint.pl +++ b/ports-mgmt/portlint/src/portlint.pl @@ -17,7 +17,7 @@ # OpenBSD and NetBSD will be accepted. # # $FreeBSD$ -# $Id: portlint.pl,v 1.74 2005/03/21 19:50:06 marcus Exp $ +# $Id: portlint.pl,v 1.75 2005/04/13 03:18:22 marcus Exp $ # use vars qw/ $opt_a $opt_A $opt_b $opt_C $opt_c $opt_h $opt_t $opt_v $opt_M $opt_N $opt_B $opt_V /; @@ -40,7 +40,7 @@ $portdir = '.'; # version variables my $major = 2; my $minor = 7; -my $micro = 0; +my $micro = 1; sub l { '[{(]'; } sub r { '[)}]'; } @@ -329,12 +329,18 @@ if ($committer) { &perror("Warning: $fullname: dotfiles are not preferred. ". "If this file is a dotfile to be installed as an example, ". "consider importing it as \"dot$_\"."); + } elsif (/[^-.a-zA-Z0-9_]/) { + &perror("Warning: $fullname: only use characters ". + "[-_.a-zA-Z0-9] for patch or script names."); } elsif (/\.(orig|rej|bak)$/ || /~$/ || /^\#/) { &perror("FATAL: $fullname: for safety, be sure to cleanup ". "backup files before committing the port."); } elsif (/(^|\.)core$/) { &perror("FATAL: $fullname: for safety, be sure to cleanup ". "core files before committing the port."); + } elsif (/README.html/) { + &perror("FATAL: $fullname: for safety, be sure to cleanup ". + "README.html files before committing the port."); } elsif ($_ eq 'CVS' && -d) { if ($newport) { &perror("FATAL: $fullname: for safety, be sure to cleanup ". @@ -1015,6 +1021,16 @@ sub checkmakefile { } # + # whole file: use of .elseif + # + print "OK: checking for use of .elseif.\n" if ($verbose); + if ($whole =~ /^\.\s*elseif/m) { + my $lineno = &linenumber($`); + &perror("FATAL: $file [$lineno]: use of .elseif is not supported ". + "in all versions of FreeBSD. Use .elif instead."); + } + + # # whole file: PLIST_FILES and PLIST_DIRS # print "OK: checking PLIST_FILES and PLIST_DIRS.\n" if ($verbose); @@ -1130,6 +1146,26 @@ sub checkmakefile { } # + # whole file: BROKEN + # + print "OK: checking BROKEN.\n" if ($verbose); + if ($whole =~ /\nBROKEN[+?]?=[ \t][^"]+\w+/) { + my $lineno = &linenumber($`); + &perror("WARN: $file [$lineno]: BROKEN messages should be ". + "quoted."); + } + + # + # whole file: IGNORE + # + print "OK: checking IGNORE.\n" if ($verbose); + if ($whole =~ /\nIGNORE[+?]?=[ \t]+"/) { + my $lineno = &linenumber($`); + &perror("WARN: $file [$lineno]: IGNORE messages should not ". + "be quoted."); + } + + # # whole file: PKGNAME # print "OK: checking PKGNAME.\n" if ($verbose); |