From 8fb527417af9ab63580b652888e6700f7e97f4e0 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Rapha=C3=ABl=20Gertz?= <git@rapsys.eu>
Date: Wed, 1 Mar 2017 10:47:05 +0100
Subject: [PATCH 1/1] Fix swaped short option

---
 letsconf | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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
-- 
2.41.1