#400 change IPv6 decode warning to be debug-only
This commit is contained in:
		| @@ -363,7 +363,7 @@ sub ipv6_addr_prefixlength { | ||||
|  | ||||
| sub ipv6_addr { | ||||
|     my $info = shift; | ||||
|     my $return; | ||||
|     my $return = {}; | ||||
|     my $indexes = $info->ipv6_index(); | ||||
|     foreach my $row (keys %$indexes) { | ||||
|         my @parts = split(/\./, $row); | ||||
| @@ -378,7 +378,8 @@ sub ipv6_addr { | ||||
|         if ($is_valid && $addrsize == 16) { | ||||
|             $return->{$row} = join(':', unpack('(H4)*', pack('C*', @parts))); | ||||
|         } else { | ||||
|             warn sprintf("%s: unable to decode table index to IPv6 address. Raw data is [%s].\n", &_my_sub_name, $row); | ||||
|             sprintf("%s: unable to decode table index to IPv6 address. Raw data is [%s].\n", &_my_sub_name, $row) | ||||
|               if $info->debug(); | ||||
|         } | ||||
|     } | ||||
|     return $return; | ||||
|   | ||||
		Reference in New Issue
	
	Block a user