Update NetAddr::MAC dependency to fix IPv6 misidentification bug

This commit is contained in:
Oliver Gorwits
2015-01-27 07:27:36 +00:00
parent 67aebae2d3
commit 99a2facbc3
5 changed files with 3 additions and 5 deletions

View File

@@ -11,7 +11,7 @@
[BUG FIXES]
* Another fix for NetAddr::MAC tripping up on v6 addresses
* Update NetAddr::MAC dependency to fix IPv6 misidentification bug
* [#191] Fix error when stopping stopped web daemon
* [#174] LDAP users should not be able to change password
* [#182] SSID and PoE showing in wrong Device Port columns

View File

@@ -61,7 +61,7 @@ requires:
Net::Domain: 1.23
Net::LDAP: 0
NetAddr::IP: 4.068
NetAddr::MAC: 0.92
NetAddr::MAC: 0.93
Opcode: 1.07
Path::Class: 0.32
Plack: 1.0023

View File

@@ -39,7 +39,7 @@ requires 'MCE' => 1.520;
requires 'Net::Domain' => 1.23;
requires 'Net::DNS' => 0.72;
requires 'Net::LDAP' => 0;
requires 'NetAddr::MAC' => 0.92;
requires 'NetAddr::MAC' => 0.93;
requires 'NetAddr::IP' => 4.068;
requires 'Opcode' => 1.07;
requires 'Path::Class' => 0.32;

View File

@@ -23,7 +23,6 @@ ajax '/ajax/content/search/node' => require_login sub {
my ( $start, $end ) = param('daterange') =~ m/(\d+-\d+-\d+)/gmx;
my $mac = NetAddr::MAC->new(mac => $node);
undef $mac if (defined $mac and $node =~ m/:{2}[a-f0-9]*$/i); # temp fix
my @active = (param('archived') ? () : (-bool => 'active'));
my @times = ();

View File

@@ -80,7 +80,6 @@ get '/search' => require_login sub {
my $nd = $s->resultset('Device')->search_fuzzy($q);
my ($likeval, $likeclause) = sql_match($q);
my $mac = NetAddr::MAC->new($q);
undef $mac if (defined $mac and $q =~ m/:{2}[a-f0-9]*$/i); # temp fix
if ($nd and $nd->count) {
if ($nd->count == 1) {