From: Mike Cardwell Date: Tue, 28 Sep 2010 14:39:05 +0000 (+0100) Subject: Wasn't enforcing the restriction that you must supply one or more of "--web", "-... X-Git-Tag: exim-4_89_1~78^2~1 X-Git-Url: https://git.exim.org/exim-website.git/commitdiff_plain/212d5d17fd4be13e5b15ac5f97119769bca61630 Wasn't enforcing the restriction that you must supply one or more of "--web", "--spec" or "--filter" --- diff --git a/script/gen.pl b/script/gen.pl index 3c1137b..76734bf 100755 --- a/script/gen.pl +++ b/script/gen.pl @@ -369,7 +369,7 @@ sub parse_arguments { error_help('Excess arguments') if ( scalar(@ARGV) ); error_help('Must include at least one of --web, --spec or --filter') - unless ( defined $opt{web} || scalar( @{ $opt{spec} } ) || scalar( @{ $opt{web} } ) ); + unless ( $opt{web} || scalar( @{ $opt{spec} || [] } ) || scalar( @{ $opt{filter} || [] } ) ); return %opt; }