Lost Device DNS setting in previous refactor

2015-07-19 11:47:45 +01:00
parent 54676ca0ea
commit d6af3b4244
2 changed files with 4 additions and 0 deletions
--- a/Netdisco/lib/App/Netdisco/Core/Discover.pm
+++ b/Netdisco/lib/App/Netdisco/Core/Discover.pm
@@ -139,6 +139,9 @@ sub store_device {
      $device->set_column( vtp_domain => (values %$vtpdomains)[-1] );
  }

+  my $hostname = hostname_from_ip($device->ip);
+  $device->set_column( dns => $hostname ) if $hostname;
+
  my @properties = qw/
    snmp_ver
    description uptime contact name location