aboutsummaryrefslogtreecommitdiff
path: root/lib/App/Acmeman/Source/Apache.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/App/Acmeman/Source/Apache.pm')
-rw-r--r--lib/App/Acmeman/Source/Apache.pm9
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');

Return to:

Send suggestions and report system problems to the System administrator.