]> git.ipfire.org Git - thirdparty/automake.git/commitdiff
options: more consistency in use of return statuses to report errors
authorStefano Lattarini <stefano.lattarini@gmail.com>
Fri, 10 May 2013 21:08:28 +0000 (23:08 +0200)
committerStefano Lattarini <stefano.lattarini@gmail.com>
Fri, 10 May 2013 21:08:28 +0000 (23:08 +0200)
* lib/Automake/Options.pm (_option_must_be_from_configure): By giving
a proper return status here.
(_process_option_list): And using it here.

Signed-off-by: Stefano Lattarini <stefano.lattarini@gmail.com>
lib/Automake/Options.pm

index dcdc119afc7abb4914217d38da42e3f63c8457d6..b6464ce526b235ab6b51dc3ce7b7aa1b9736cdbb 100644 (file)
@@ -245,6 +245,7 @@ Return 1 on error, 0 otherwise.
 
 =cut
 
+# $BOOL
 # _option_must_be_from_configure ($OPTION, $WHERE)
 # ----------------------------------------------
 # Check that the $OPTION given in location $WHERE is specified with
@@ -252,13 +253,15 @@ Return 1 on error, 0 otherwise.
 sub _option_must_be_from_configure ($$)
 {
   my ($opt, $where)= @_;
-  return
+  return 1
     if $where->get =~ /^configure\./;
   error $where,
         "option '$opt' can only be used as argument to AM_INIT_AUTOMAKE\n" .
         "but not in AUTOMAKE_OPTIONS makefile statements";
+  return 0;
 }
 
+# $BOOL
 # _is_valid_easy_option ($OPTION)
 # -------------------------------
 # Explicitly recognize valid automake options that require no
@@ -357,7 +360,8 @@ sub _process_option_list (\%@)
         }
       elsif ($_ eq 'tar-v7' || $_ eq 'tar-ustar' || $_ eq 'tar-pax')
         {
-          _option_must_be_from_configure ($_, $where);
+          return 1
+            unless _option_must_be_from_configure ($_, $where);
           for my $opt ('tar-v7', 'tar-ustar', 'tar-pax')
             {
               next