-Speed up checks for host relocations
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@7011 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
06483aafe0
commit
6a01080492
@ -1400,8 +1400,8 @@ sub generic_vm_operation { #The general form of firing per-vm requests to ESX hy
|
||||
$node =~ s/\..*//; #try the short name;
|
||||
}
|
||||
if (defined $tablecfg{vm}->{$node}) { #see if the host pointer requires a refresh
|
||||
my $host = $hyphash{$hyp}->{conn}->get_view(mo_ref=>$_->{'runtime.host'});
|
||||
$host = $host->summary->config->name;
|
||||
my $host = $hyphash{$hyp}->{conn}->get_view(mo_ref=>$_->{'runtime.host'},properties=>['summary.config.name']);
|
||||
$host = $host->{'summary.config.name'};
|
||||
if ( $tablecfg{vm}->{$node}->[0]->{host} eq "$host" ) { next; }
|
||||
my $newnhost = inet_aton($host);
|
||||
my $oldnhost = inet_aton($tablecfg{vm}->{$node}->[0]->{host});
|
||||
|
Loading…
Reference in New Issue
Block a user