On clonevm, assume URL matches source VM if not specified in a clonevm -t

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@9451 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jbjohnso 2011-05-01 16:43:50 +00:00
parent 61e8a4ec3a
commit 6c8e21ef62

View File

@ -1999,6 +1999,12 @@ sub clonevms {
$url=$target;
$url =~ s!/([^/]*)\z!!;
$mastername=$1;
unless ($url) {
$url = $tablecfg{vm}->{$nodes->[0]}->[0]->{storage};
$url =~ s/.*\|//;
$url =~ s/=(.*)//;
$url =~ s/,.*//;
}
$newdatastores->{$url}=[$nodes->[0]];
}
if ($hyp) {