Fix arg count of one call to error_help()

diff --git a/script/gen.pl b/script/gen.pl
index 336f6e1641b73aa1b7314c4280b2ae765efa0a60..fe83e6e7a9e56c6a69e49a80a071f28dc35e5e1f 100755 (executable)
--- 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