More consistency.
[openssl.git] / util / mk1mf.pl
index 355143b703d84815746cde04b3ef91c67fa0be8b..e1e9985063490957412673b2e69c8b57a4c5a296 100755 (executable)
@@ -45,7 +45,7 @@ foreach (@ARGV)
        if (!&read_options && !defined($ops{$_}))
                {
                print STDERR "unknown option - $_\n";
-               print STDERR "usage: perl mk1mf.pl [system] [options]\n";
+               print STDERR "usage: perl mk1mf.pl [options] [system]\n";
                print STDERR "\nwhere [system] can be one of the following\n";
                foreach $i (sort keys %ops)
                { printf STDERR "\t%-10s\t%s\n",$i,$ops{$i}; }
@@ -831,6 +831,6 @@ sub read_options
        elsif (/^-[lL].*$/)     { $l_flags.="$_ "; }
        elsif ((!/^-help/) && (!/^-h/) && (!/^-\?/) && /^-.*$/)
                { $c_flags.="$_ "; }
-       else { return(1); }
-       return(0);
+       else { return(0); }
+       return(1);
        }