diff options
Diffstat (limited to 'lib/App/Acmeman/Source/Apache.pm')
-rw-r--r-- | lib/App/Acmeman/Source/Apache.pm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lib/App/Acmeman/Source/Apache.pm b/lib/App/Acmeman/Source/Apache.pm index 1c0e677..58ba39e 100644 --- a/lib/App/Acmeman/Source/Apache.pm +++ b/lib/App/Acmeman/Source/Apache.pm @@ -97,7 +97,8 @@ sub examine_http_config { foreach my $sect ($app->section(-name => "virtualhost")) { my ($server_name) = (map { $self->dequote($_->value) } $sect->directive('servername')); - my @server_aliases = map { quotewords('\s+', 0, $self->dequote($_->value)) } + my @server_aliases = map { quotewords('\s+', 0, + $self->dequote($_->value)) } $sect->directive('serveralias'); my @d = map { if ($_->value =~ m{^(?ix) @@ -119,7 +120,7 @@ sub examine_http_config { } elsif (my ($ref) = map { $_->[1] } grep { $_->[0] eq 'reference' } @d) { $self->set('domain', $ref, 'files', 'apache'); - $self->define_alias($ref, @server_aliases); + $self->define_alias($ref, $server_name, @server_aliases); } } return 1; |