improving helper.pl

This commit is contained in:
Karel Miko 2017-03-21 19:56:43 +01:00
parent 63e6f7647f
commit 283ea0c426

View File

@ -257,7 +257,9 @@ sub process_makefiles {
sub die_usage { sub die_usage {
die <<"MARKER"; die <<"MARKER";
usage: $0 --check-source usage: $0 --check-source
$0 --check-defines
$0 --check-makefiles $0 --check-makefiles
$0 --check-all
$0 --update-makefiles $0 --update-makefiles
MARKER MARKER
} }
@ -265,14 +267,15 @@ MARKER
GetOptions( "check-source" => \my $check_source, GetOptions( "check-source" => \my $check_source,
"check-defines" => \my $check_defines, "check-defines" => \my $check_defines,
"check-makefiles" => \my $check_makefiles, "check-makefiles" => \my $check_makefiles,
"check-all" => \my $check_all,
"update-makefiles" => \my $update_makefiles, "update-makefiles" => \my $update_makefiles,
"help" => \my $help "help" => \my $help
) or die_usage; ) or die_usage;
my $failure; my $failure;
$failure ||= check_source() if $check_source; $failure ||= check_source() if $check_all || $check_source;
$failure ||= check_defines() if $check_defines; $failure ||= check_defines() if $check_all || $check_defines;
$failure ||= process_makefiles(0) if $check_makefiles; $failure ||= process_makefiles(0) if $check_all || $check_makefiles;
$failure ||= process_makefiles(1) if $update_makefiles; $failure ||= process_makefiles(1) if $update_makefiles;
die_usage unless defined $failure; die_usage unless defined $failure;