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

fix bug about 'hwtype' string changing into a string array in hierarchical environment.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@13396 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
zhaoertao 2012-08-02 06:47:54 +00:00
parent 2d49286342
commit 50feb83e56
1 changed files with 6 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
xCAT-server/lib/perl/xCAT/PPC.pm
View File

@ -1774,9 +1774,6 @@ sub runcmd {
my $cmd = $request->{command};
my $method = $request->{method};
my $hwtype = $request->{hwtype};
if (ref($hwtype) eq 'ARRAY') {
$hwtype = @$hwtype[0];
}
#my $modname = $modules{$cmd};
my $modname = $modules{$cmd}{$hwtype};
@ -2163,6 +2160,7 @@ sub process_request {
$request->{stdin} = $req->{stdin}->[0];
$request->{method} = $req->{method}->[0];
$request->{op} = $req->{op}->[0];
$request->{enableASMI} = $req->{enableASMI};
#support more options in hierachy
if( ref( $req->{opt}) eq 'ARRAY' ) {
@ -2172,9 +2170,12 @@ sub process_request {
$t{$k} = $h->{$k}->[0];
}
$request->{opt} = \%t;
}
}
if (ref($req->{hwtype}) eq 'ARRAY') {
$request->{hwtype} = $req->{hwtype}->[0];
}
# $request->{hwtype} = $package;
# $request->{hwtype} = $package;
$request->{callback}= $callback;
$request->{subreq} = $subreq;
#########################