arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fixed the error of prompt messages

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3560 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jjhua 2009-06-12 10:12:37 +00:00
parent 5b89d29070
commit 89c5468588
1 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
perl-xCAT/xCAT/PPCrflash.pm
View File

@ -622,8 +622,10 @@ sub rflash {
}
dpush(\@value,[$hmc, $msg]);
}
$infor{$managed_system} = ["upgrade", $release_level, $active_level, $file];
$infor{$managed_system} = ["upgrade", $release_level, $active_level, $file, "power", $mtms];
} else {
$infor{$managed_system} = ["upgrade", $release_level, $active_level, $file];
}
}
my $rpm_dest = $::POWER_DEST_DIR."/".$dirlist[0];
@ -751,6 +753,9 @@ sub rflash {
print "++ infor +\n";
print Dumper(%infor);
print "++++\n";
if($$tmp3[4] eq "power") {
$tmp1[1] = $$tmp3[5];
}
if($$tmp3[0] eq "upgrade") {
push(@result,[$hmc, "failed to $$tmp3[0] $tmp1[1] from release level:$$tmp3[1] activated level:$$tmp3[2] to $$tmp3[3]"]);
} else {
@ -758,6 +763,9 @@ sub rflash {
}
} else { # successful
my $tmp3 = $infor{$tmp1[1]};
if($$tmp3[4] eq "power") {
$tmp1[1] = $$tmp3[5];
}
if($$tmp3[0] eq "upgrade") {
push(@result,[$hmc, "$$tmp3[0] $tmp1[1] from release level:$$tmp3[1] activated level:$$tmp3[2] to $$tmp3[3] successfully"]);
} else {