135/netdisco
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

check_acl call fixes

Browse Source
This commit is contained in:
Oliver Gorwits
2017-05-30 11:38:34 +01:00
parent e0d2517387
commit d007d72015
4 changed files with 8 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/App/Netdisco/Util/DNS.pm
View File

@@ -8,7 +8,7 @@ use Net::DNS;
use AnyEvent::DNS;
use NetAddr::IP::Lite ':lower';
use App::Netdisco::Util::Permission 'check_acl';
use App::Netdisco::Util::Permission 'check_acl_no';
use base 'Exporter';
our @EXPORT = ();
@@ -129,7 +129,7 @@ sub hostnames_resolve_async {
IP: foreach my $hash_ref (@$ips) {
my $ip = $hash_ref->{'ip'} || $hash_ref->{'alias'};
next IP if check_acl($ip, $skip);
next IP if check_acl_no($ip, $skip);
# check /etc/hosts file and short-circuit if found
foreach my $name (reverse sort keys %HOSTS) {