fixed defect 3266

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/branches/2.7@14735 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
linggao 2013-01-02 22:11:43 +00:00
parent e55ac17bbf
commit d147b6fab4

View File

@ -1211,8 +1211,8 @@ sub plugin_command {
if ($sock) { close $pfd; }
unless ($handler_hash{$_} == 1) {
#ok, if nodes have numbers, this sorts them numerically... roughly..
#if node doesn't, then it spews a message, need to fix
my @nodes = sort {($a =~ /(\d+)/)[0] <=> ($b =~ /(\d+)/)[0] || $a cmp $b } (keys %{$handler_hash{$_}});
#if node doesn't, then it sorts out alphabetically.
my @nodes = sort {($a =~ /(\d+)/ ? $1 : -1)[0] <=> ($b =~ /(\d+)/ ? $1 : -1)[0] || $a cmp $b } (keys %{$handler_hash{$_}});
$req->{node}=\@nodes;
}
no strict "refs";