Update to 2.15.4.
Use File::Basename so that only the patch filename is checked for the 100 character limit. PR: 192161
This commit is contained in:
parent
d675c18153
commit
5577d18b3f
Notes:
svn2git
2021-03-31 03:12:20 +00:00
svn path=/head/; revision=363150
2 changed files with 7 additions and 4 deletions
|
@ -2,7 +2,7 @@
|
|||
# $FreeBSD$
|
||||
|
||||
PORTNAME= portlint
|
||||
PORTVERSION= 2.15.3
|
||||
PORTVERSION= 2.15.4
|
||||
CATEGORIES= ports-mgmt
|
||||
MASTER_SITES= # none
|
||||
DISTFILES= # none
|
||||
|
|
|
@ -15,7 +15,7 @@
|
|||
# was removed.
|
||||
#
|
||||
# $FreeBSD$
|
||||
# $MCom: portlint/portlint.pl,v 1.325 2014/07/12 14:39:55 marcus Exp $
|
||||
# $MCom: portlint/portlint.pl,v 1.327 2014/07/28 13:15:56 marcus Exp $
|
||||
#
|
||||
|
||||
use strict;
|
||||
|
@ -24,6 +24,7 @@ use warnings;
|
|||
use Getopt::Std;
|
||||
use File::Find;
|
||||
use IPC::Open2;
|
||||
use File::Basename;
|
||||
use POSIX qw(strftime);
|
||||
|
||||
sub perror($$$$);
|
||||
|
@ -50,7 +51,7 @@ $portdir = '.';
|
|||
# version variables
|
||||
my $major = 2;
|
||||
my $minor = 15;
|
||||
my $micro = 3;
|
||||
my $micro = 4;
|
||||
|
||||
sub l { '[{(]'; }
|
||||
sub r { '[)}]'; }
|
||||
|
@ -1046,7 +1047,9 @@ sub checkpatch {
|
|||
return;
|
||||
}
|
||||
|
||||
if (length $file > 100) {
|
||||
my $bfile = basename($file);
|
||||
|
||||
if (length $bfile > 100) {
|
||||
&perror("FATAL", $file, -1, "make sure patch file names contain no ".
|
||||
"more than 100 characters.");
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue