Prise en compte des vhosts en plus des domaines

This commit is contained in:
Daniel Berteaud 2012-10-05 11:36:42 +02:00
parent e1a93b6918
commit fa7801c08e
2 changed files with 2 additions and 2 deletions

View File

@ -16,7 +16,7 @@ if (defined $domain){
@domains = $d->get($domain);
}
else{
@domains = ($d->domains);
@domains = ($d->domains,$d->get_all_by_prop(type=>'vhost'));
}
foreach my $dom (@domains){

View File

@ -1,7 +1,7 @@
{
use esmith::DomainsDB;
my $d = esmith::DomainsDB->open_ro or die "Couldn't open DomainsDB\n";
foreach my $dom ($d->domains){
foreach my $dom ($d->domains,$d->get_all_by_prop('type=>'vhost')){
my $stats = $dom->prop('Stats') || 'disabled';
next unless ($stats eq 'enabled');
my $name = $dom->key;