summaryrefslogtreecommitdiff
path: root/ports-mgmt/portlint
diff options
context:
space:
mode:
authorShigeyuki Fukushima <shige@FreeBSD.org>2000-01-12 04:48:15 +0000
committerShigeyuki Fukushima <shige@FreeBSD.org>2000-01-12 04:48:15 +0000
commit0e2e06a88a2bf289d999d1c1d05cb549664b8f7c (patch)
tree2f841785189b3f8609d2766f3d4b4bc2de29f7f0 /ports-mgmt/portlint
parentIt doesn't need guile. (diff)
Fixes:
- Allow "MAINTAINER?=". - Allow "CATEGORIES?=" and "CATEGORIES+=". PR: ports/16064 Submitted by: KIRIYAMA Kazuhiko <kiri@pis.toba-cmt.ac.jp>
Notes
Notes: svn path=/head/; revision=24664
Diffstat (limited to 'ports-mgmt/portlint')
-rw-r--r--ports-mgmt/portlint/src/portlint.pl28
1 files changed, 17 insertions, 11 deletions
diff --git a/ports-mgmt/portlint/src/portlint.pl b/ports-mgmt/portlint/src/portlint.pl
index 7b5205f738cf..d575e78944a0 100644
--- a/ports-mgmt/portlint/src/portlint.pl
+++ b/ports-mgmt/portlint/src/portlint.pl
@@ -677,15 +677,21 @@ EOF
# check the items that has to be there.
$tmp = "\n" . $tmp;
- foreach $i ('DISTNAME', 'CATEGORIES') {
- print "OK: checking $i.\n" if ($verbose);
- if ($tmp !~ /\n$i=/) {
- &perror("FATAL: $i has to be there.");
- }
- if ($tmp =~ /\n$i(\?=)/) {
- &perror("FATAL: $i has to be set by \"=\", ".
- "not by \"$1\".");
- }
+ print "OK: checking DISTNAME.\n" if ($verbose);
+ if ($tmp !~ /\nDISTNAME=/) {
+ &perror("FATAL: DISTNAME has to be there.");
+ }
+ if ($tmp =~ /\nDISTNAME(\?=)/) {
+ &perror("FATAL: DISTNAME has be set by \"=\", ".
+ "not by \"$1\".");
+ }
+ print "OK: checking CATEGORIES.\n" if ($verbose);
+ if ($tmp !~ /\nCATEGORIES(?=)/) {
+ &perror("FATAL: CATEGORIES has to be there.");
+ }
+ if ($tmp =~ /\nCATEGORIES([^?+]=)/) {
+ &perror("WARN: CATEGORIES should be set by \"=\", \"?=\", or \"+=\", ".
+ "not by \"$1\".");
}
# check x11 in CATEGORIES
@@ -890,8 +896,8 @@ EOF
&checkearlier($tmp, @varnames);
$tmp = "\n" . $tmp;
- if ($tmp =~ /\nMAINTAINER=[^\n]+/) {
- $tmp =~ s/\nMAINTAINER=[^\n]+//;
+ if ($tmp =~ /\nMAINTAINER\??=[^\n]+/) {
+ $tmp =~ s/\nMAINTAINER\??=[^\n]+//;
} else {
&perror("FATAL: no MAINTAINER listed in $file.");
}