From 8bf82f930f60dd71d0f491c5f70d0a06aedca67e Mon Sep 17 00:00:00 2001 From: Todd Lyons Date: Tue, 8 Jul 2014 08:49:57 -0700 Subject: [PATCH] Fix arg count of one call to error_help() --- script/gen.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/script/gen.pl b/script/gen.pl index 336f6e1..fe83e6e 100755 --- a/script/gen.pl +++ b/script/gen.pl @@ -475,7 +475,7 @@ sub parse_arguments { ## --spec and --filter lists foreach my $set (qw[spec filter]) { $opt{$set} = - [ map { my $f = File::Spec->rel2abs($_); error_help( 1, 'No such file: ' . $_ ) unless -f $f; $f } + [ map { my $f = File::Spec->rel2abs($_); error_help( 'No such file: ' . $_ ) unless -f $f; $f } @{ $opt{$set} } ]; } ## --latest -- 2.30.2