X-Git-Url: https://git.openstreetmap.org/dns.git/blobdiff_plain/7a9436f97e54cd39792a2b3171abb966646fbe30..5bbe92e3e4e7aa57e0b9f44b3ac59f99e347cf9f:/bin/mkgeo diff --git a/bin/mkgeo b/bin/mkgeo index 40527e2..7b70c22 100755 --- a/bin/mkgeo +++ b/bin/mkgeo @@ -273,33 +273,33 @@ sub match_origin { $match = "preferred"; } - elsif ($cluster->{preferred} && - $cluster->{preferred}->{continents} && - grep { $_ eq $origin->{continent} } @{$cluster->{preferred}->{continents}}) - { - $match = "preferred"; - } elsif ($cluster->{allowed} && $cluster->{allowed}->{countries} && grep { $_ eq $origin->{country} } @{$cluster->{allowed}->{countries}}) { $match = "allowed"; } + elsif ($cluster->{denied} && + $cluster->{denied}->{countries} && + grep { $_ eq $origin->{country} } @{$cluster->{denied}->{countries}}) + { + $match = "denied"; + } + elsif ($cluster->{preferred} && + $cluster->{preferred}->{continents} && + grep { $_ eq $origin->{continent} } @{$cluster->{preferred}->{continents}}) + { + $match = "preferred"; + } elsif ($cluster->{allowed} && $cluster->{allowed}->{continents} && grep { $_ eq $origin->{continent} } @{$cluster->{allowed}->{continents}}) { $match = "allowed"; } - elsif ($cluster->{denied} && - $cluster->{denied}->{countries} && - grep { $_ eq $origin->{country} } @{$cluster->{preferred}->{countries}}) - { - $match = "denied"; - } elsif ($cluster->{denied} && $cluster->{denied}->{continents} && - grep { $_ eq $origin->{continent} } @{$cluster->{preferred}->{continents}}) + grep { $_ eq $origin->{continent} } @{$cluster->{denied}->{continents}}) { $match = "denied"; }