wip: check ip is nat, not bridged

issue #1672

lib/Ravada/Domain/KVM.pm

@@ -1644,7 +1644,7 @@ sub _ip_agent($self) {
             $found = $addr->{addr} if !$found;
 
             return $addr->{addr}
-            if $self->_vm->_is_ip_bridged($addr->{addr});
+            if $self->_vm->_is_ip_nat($addr->{addr});
         }
     }
     return $found;

lib/Ravada/VM/KVM.pm

@@ -2556,7 +2556,7 @@ sub list_machine_types($self) {
     return %ret_types;
 }
 
-sub _is_ip_bridged($self, $ip0) {
+sub _is_ip_nat($self, $ip0) {
     my $ip = NetAddr::IP->new($ip0);
     for my $net ( $self->vm->list_networks ) {
         my $xml = XML::LibXML->load_xml(string