fix explosion on partial IP - github issue #7
This commit is contained in:
@@ -197,8 +197,8 @@ get '/search' => sub {
|
|||||||
else {
|
else {
|
||||||
my $s = schema('netdisco');
|
my $s = schema('netdisco');
|
||||||
if ($q =~ m{^[a-f0-9.:/]+$}i) {
|
if ($q =~ m{^[a-f0-9.:/]+$}i) {
|
||||||
if (NetAddr::IP::Lite->new($q) and
|
my $ip = NetAddr::IP::Lite->new($q);
|
||||||
$s->resultset('Device')->find($q)) {
|
if ($ip and $s->resultset('Device')->search_by_field({ip => $q})->count) {
|
||||||
params->{'tab'} = 'device';
|
params->{'tab'} = 'device';
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
|
|||||||
Reference in New Issue
Block a user