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:
Joe Marcus Clarke 2014-07-28 13:21:06 +00:00
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

View file

@ -2,7 +2,7 @@
# $FreeBSD$
PORTNAME= portlint
PORTVERSION= 2.15.3
PORTVERSION= 2.15.4
CATEGORIES= ports-mgmt
MASTER_SITES= # none
DISTFILES= # none

View file

@ -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.");
}