From: Raphaël Gertz <git@rapsys.eu>
Date: Wed, 1 Mar 2017 09:47:05 +0000 (+0100)
Subject: Fix swaped short option
X-Git-Tag: 0.6.0~2
X-Git-Url: https://git.rapsys.eu/acme/commitdiff_plain/a2a0d9bf4597fbd23c69d4e2288b2efd639ceda3?hp=b8394ca77f165a8862ab2055ba1b8ae472b2b901

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