From: Raphaƫl Gertz Date: Wed, 1 Mar 2017 09:47:05 +0000 (+0100) Subject: Fix swaped short option X-Git-Tag: 2.0.3~32 X-Git-Url: https://git.rapsys.eu/acme/commitdiff_plain/8fb527417af9ab63580b652888e6700f7e97f4e0?ds=sidebyside;hp=d395b0780b72d66dafefde068827f848f4790ecf Fix swaped short option --- diff --git a/letsconf b/letsconf index e4b70cf..72e7a11 100755 --- a/letsconf +++ b/letsconf @@ -48,7 +48,7 @@ my $prod = 0; # Strip and enable debug for (my $i = 0; $i <= $#ARGV; $i++) { # Match redhat types - if ($ARGV[$i] =~ /^(?:(\-d|\-\-redhat)(?:=([^-][a-zA-Z0-9_\.,-]+))?)$/) { + if ($ARGV[$i] =~ /^(?:(\-r|\-\-redhat)(?:=([^-][a-zA-Z0-9_\.,-]+))?)$/) { if (defined($2)) { push(@redhat, split(',', $2)); # Extract next parameter @@ -60,7 +60,7 @@ for (my $i = 0; $i <= $#ARGV; $i++) { push(@redhat, ('example.com')); } # Match debian types - } elsif ($ARGV[$i] =~ /^(?:(\-r|\-\-debian)(?:=([^-][a-zA-Z0-9_\.,-]+))?)$/) { + } elsif ($ARGV[$i] =~ /^(?:(\-d|\-\-debian)(?:=([^-][a-zA-Z0-9_\.,-]+))?)$/) { if (defined($2)) { push(@debian, split(',', $2)); # Extract next parameter