diff options
-rwxr-xr-x | FS/FS/addr_block.pm | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/FS/FS/addr_block.pm b/FS/FS/addr_block.pm index 4b034ef..1fb6060 100755 --- a/FS/FS/addr_block.pm +++ b/FS/FS/addr_block.pm @@ -176,11 +176,12 @@ sub next_free_addr { my $conf = new FS::Conf; my @excludeaddr = $conf->config('exclude_ip_addr'); - my @used = ( - map { $_->NetAddr->addr } - ($self, - qsearch('svc_broadband', { blocknum => $self->blocknum }) ), - @excludeaddr ); +my @used = +( (map { $_->NetAddr->addr } + ($self, + qsearch('svc_broadband', { blocknum => $self->blocknum })) + ), @excludeaddr +); my @free = $self->NetAddr->hostenum; while (my $ip = shift @free) { |