From a8027600c03a541ae2eaf5fdd9a421dcaa0512a6 Mon Sep 17 00:00:00 2001 From: daniceexi Date: Mon, 24 Jan 2011 08:40:19 +0000 Subject: [PATCH] fixed the issue that error output msg has multiple line git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@8728 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- xCAT-server/lib/perl/xCAT/PPC.pm | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/xCAT-server/lib/perl/xCAT/PPC.pm b/xCAT-server/lib/perl/xCAT/PPC.pm index 2543bc4df..a6aeb7268 100644 --- a/xCAT-server/lib/perl/xCAT/PPC.pm +++ b/xCAT-server/lib/perl/xCAT/PPC.pm @@ -602,7 +602,9 @@ sub child_response { if ($nodename eq $_->{node}->[0]->{name}->[0]) { #save the nodes that has errors for node status monitoring if ((exists($_->{errorcode})) && ($_->{errorcode} != 0)) { - push(@$failed_nodes, $nodename); + if (!grep /^$nodename$/, @$failed_nodes) { + push(@$failed_nodes, $nodename); + } if( defined( $failed_msg->{$nodename} )) { my $f = $failed_msg->{$nodename}; my $c = scalar(@$f);