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

resolve some bugs for chvm|lsvm

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@10208 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
zhaoertao
2011-08-02 09:27:57 +00:00
parent 61f9181cba
commit d20009c46d
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
perl-xCAT/xCAT/FSPvm.pm
View File

@@ -585,7 +585,7 @@ sub lsvm_parse_args {
$Getopt::Long::ignorecase = 0;
Getopt::Long::Configure( "bundling" );
if ( !GetOptions( \%opt, qw(V|verbose ) )) {
if ( !GetOptions( \%opt, qw(V|verbose l|long) )) {
return( usage() );
}
####################################
@@ -854,7 +854,9 @@ sub get_lpar_lpar_name {
my $attr = shift;
my $values = xCAT::FSPUtils::fsp_api_action($name, $attr, "get_lpar_name");
if (@$values[1] && ((@$values[1] =~ /Error/i) && (@$values[2] ne '0'))) {
return $values;
my @result = ();
push @result, $values;
return \@result;
}
return @$values[1];
}