diff options
| -rw-r--r-- | FS/FS/svc_IP_Mixin.pm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/FS/FS/svc_IP_Mixin.pm b/FS/FS/svc_IP_Mixin.pm index ff7c2f5d4..5b06082a1 100644 --- a/FS/FS/svc_IP_Mixin.pm +++ b/FS/FS/svc_IP_Mixin.pm @@ -96,7 +96,12 @@ sub _used_addresses { my %hash = ( $ip_field => { op => '!=', value => '' } ); #$hash{'blocknum'} = $block->blocknum if $block; $hash{'svcnum'} = { op => '!=', value => $exclude->svcnum } if ref $exclude; - map { $_->NetAddr->addr } qsearch($class->table, \%hash); + map { my $na = $_->NetAddr; $na ? $na->addr : () } + qsearch({ + table => $class->table, + hashref => \%hash, + extra_sql => " AND $ip_field != '0e0'", + }); } sub _is_used { |