From 95bdd32c8756fdda35f53dceeb0f6b5731121d07 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Thu, 17 Jun 2010 18:55:31 +0000
Subject: [PATCH] -Update vm.storage as approrpritae on rmigrate -s

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@6516 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server/lib/xcat/plugins/esx.pm | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/xCAT-server/lib/xcat/plugins/esx.pm b/xCAT-server/lib/xcat/plugins/esx.pm
index ea72d257a..322a43a9c 100644
--- a/xCAT-server/lib/xcat/plugins/esx.pm
+++ b/xCAT-server/lib/xcat/plugins/esx.pm
@@ -909,8 +909,15 @@ sub relocate_callback {
     my $parms = shift;
     my $state = $task->info->state->val;
     if ($state eq 'success') {
-        #my $vmtab = xCAT::Table->new('vm'); #TODO: update vm.storage?
-        #$vmtab->setNodeAttribs($parms->{node},{host=>$parms->{target}});
+        my $vmtab = xCAT::Table->new('vm'); #TODO: update vm.storage?
+        my $prevloc = $tablecfg{vm}->{$node}->[0]->{storage}; 
+        my $model;
+        ($prevloc,$model) = split /=/,$prevloc;
+        my $target = $parms->{target};
+        if ($prevloc) {
+            $target.="=$prevloc";
+        }
+        $vmtab->setNodeAttribs($parms->{node},{storage=>$target);
         sendmsg(":relocated to to ".$parms->{target},$parms->{node});
     } else {
         relay_vmware_err($task,"Relocating to ".$parms->{target}." ",$parms->{node});