diff options
-rw-r--r-- | lib/App/Acmeman/Source/Apache.pm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lib/App/Acmeman/Source/Apache.pm b/lib/App/Acmeman/Source/Apache.pm index a9a6195..8497e00 100644 --- a/lib/App/Acmeman/Source/Apache.pm +++ b/lib/App/Acmeman/Source/Apache.pm @@ -66,7 +66,8 @@ sub examine_http_config { foreach my $sect ($app->section(-name => "macro")) { if ($sect->value =~ m{^(?ix)letsencryptssl \s+ - (.+)}) { + (.+)} + && ! $self->is_set(qw(files apache))) { $self->set(qw(files apache argument), $1); map { if ($_->name =~ m{^(?ix) @@ -93,8 +94,10 @@ sub examine_http_config { } foreach my $sect ($app->section(-name => "virtualhost")) { - my ($server_name) = (map { $self->dequote($_->value) } - $sect->directive('servername')); + my ($server_name) = (map { + (my $s = $self->dequote($_->value)) =~ s{^https?://}{}; + $s + } $sect->directive('servername')); my @server_aliases = map { quotewords('\s+', 0, $self->dequote($_->value)) } $sect->directive('serveralias'); |