pureslaves now work too

2016-02-22 12:16:03 -05:00
parent 31b1b9ba58
commit db05757b79
10 changed files with 97 additions and 32 deletions
--- a/bin/list-vhosts
+++ b/bin/list-vhosts
@ -6,7 +6,7 @@ use Martnet::DDNS;

 my $ddns = Martnet::DDNS->new();

-my @vh = $ddns->getvhosts();
+my @vh = $ddns->get('_vhosts');
 foreach my $i (sort {$a->{zone} cmp $b->{zone}} @vh) {
    print $i->{zone}, ". master: ", $i->{master},"\n";
 }