fix typos

Netdisco/lib/App/Netdisco/Core/Discover.pm

@@ -140,7 +140,7 @@ sub store_device {
   my $resolved_aliases = hostnames_resolve_async(\@aliases);
 
   # fake one aliases entry for devices not providing ip_index
-  push @$resolved_aliases, { alias => $device->ip, dns => $hostname }
+  push @$resolved_aliases, { alias => $device->ip, dns => $device->dns }
     if 0 == scalar @aliases;
 
   # VTP Management Domain -- assume only one.

Netdisco/lib/App/Netdisco/Util/Device.pm

@@ -89,7 +89,7 @@ sub delete_device {
     schema('netdisco')->resultset('UserLog')->create({
       username => session('logged_in_user'),
       userip => scalar eval {request->remote_address},
-      event => "Delete device ". $device->ip ." ($ip)",
+      event => ("Delete device ". $device->ip),
       details => $log,
     });