fix bug in renumbering to an alias

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

@@ -63,12 +63,6 @@ sub set_canonical_ip {
       $new_ip = $revname;
   }
 
-  # check if user has renumbered to an alias
-  if ($new_ip ne $old_ip
-      and $device->device_ips->count({alias => $old_ip})) {
-      $new_ip = $old_ip;
-  }
-
   if (setting('device_identity')) {
   }
 

Netdisco/lib/App/Netdisco/DB/Result/Device.pm

@@ -235,10 +235,6 @@ sub renumber {
     ->search({remote_ip => $old_ip})
     ->update({remote_ip => $new_ip});
 
-  $schema->resultset('DeviceIp')
-    ->search({alias => $old_ip})
-    ->update({alias => $new_ip});
-
   $schema->resultset('Admin')
     ->search({device => $old_ip})
     ->update({device => $new_ip});

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),
+      event => (sprintf "Delete device %s", $device->ip),
       details => $log,
     });
 
@@ -122,7 +122,7 @@ sub renumber_device {
     schema('netdisco')->resultset('UserLog')->create({
       username => session('logged_in_user'),
       userip => scalar eval {request->remote_address},
-      event => "Renumbered device from $ip to $new_ip",
+      event => (sprintf "Renumber device %s to %s", $device->ip, $new_ip),
     });
 
     $happy = 1;