Search tools.

1 files changed, 2 insertions, 2 deletions

diff --git a/fripost-newdomain b/fripost-newdomain
index 3c877e5..7cbac3b 100755
--- a/fripost-newdomain
+++ b/fripost-newdomain
@@ -185,7 +185,7 @@ else {
     if ($res->count) {
         print STDERR "WARN: Domain `" .$domain{domain}. "' already exists.";
         my @owners;
-        map { push @owners, $_->{owner} if defined $_->{owner} } ($res->entries);
+        map { push @owners, @{$_->{owner}} if defined $_->{owner} } $res->entries;
         if (@owners) {
             print STDERR " (Owned by ";
             print STDERR (join ', ', map { '`' .$_. "'"} @owners);
@@ -224,7 +224,7 @@ sub create_alias {
     if ($res->count) {
         print STDERR "WARN: Alias $alias{address} already exists.";
         print STDERR "(Targetting to ";
-        print STDERR (join ', ', map { $_->{goto} } ($res->entries));
+        print STDERR (join ', ', map { $_->{goto} } $res->entries);
         say STDERR ".)";
         return unless grep { $_->{goto} eq $alias{goto} } $res->entries;
     }