diff options
| author | Olaf Johansson <olof@ethup.se> | 2015-06-02 07:41:35 -0400 |
|---|---|---|
| committer | Rich Salz <rsalz@openssl.org> | 2015-06-02 11:25:24 -0400 |
| commit | bd5b5b4c4bda92399bf2b96cf399d6fef107856e (patch) | |
| tree | 74b90bf12c6e427f67259b38d686e30e4a3ab26b | |
| parent | 188f3f976764f2b0d486448a5054ea711f9b8abe (diff) | |
GH249: Fix bad regexp in arg parsing.
Signed-off-by: Rich Salz <rsalz@akamai.com>
Reviewed-by: Richard Levitte <levitte@openssl.org>
(cherry picked from commit 8846adbd36c1de2b0d38a73ca32e28fde50083b8)
| -rw-r--r-- | tools/c_rehash.in | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tools/c_rehash.in b/tools/c_rehash.in index 887e927125..b086ff9cf0 100644 --- a/tools/c_rehash.in +++ b/tools/c_rehash.in @@ -15,13 +15,13 @@ my $symlink_exists=eval {symlink("",""); 1}; my $removelinks = 1; ## Parse flags. -while ( $ARGV[0] =~ '-.*' ) { +while ( $ARGV[0] =~ /^-/ ) { my $flag = shift @ARGV; last if ( $flag eq '--'); - if ( $flag =~ /-old/) { + if ( $flag eq '-old') { $x509hash = "-subject_hash_old"; $crlhash = "-hash_old"; - } elsif ( $flag =~ /-h/) { + } elsif ( $flag eq '-h') { help(); } elsif ( $flag eq '-n' ) { $removelinks = 0; |