From 75526bb297319f9374c6ddabaacfd0e009b28c81 Mon Sep 17 00:00:00 2001
From: wuzhy <wuzhy@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 8 Feb 2010 04:19:37 +0000
Subject: [PATCH] fix the output sorting about "nodels lpar"

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5184 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/Client.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/perl-xCAT/xCAT/Client.pm b/perl-xCAT/xCAT/Client.pm
index 9f4eb03bc..7f087887a 100644
--- a/perl-xCAT/xCAT/Client.pm
+++ b/perl-xCAT/xCAT/Client.pm
@@ -868,8 +868,7 @@ sub handle_response {
 #print "printing node\n";
     my $nodes=($rsp->{node});
     my $node;
-    my @nodelist = sort {$a cmp $b} @$nodes;
-    foreach $node (@nodelist) {
+    foreach $node (@$nodes) {
       my $desc=$node->{name}->[0];
       if ($node->{errorcode}) {
         if (ref($node->{errorcode}) eq 'ARRAY') { foreach my $ecode (@{$node->{errorcode}}) { $xCAT::Client::EXITCODE |= $ecode; } }