From 17de04099464ca33f18c4156cfd77a8f2650dc2c Mon Sep 17 00:00:00 2001
From: lissav <lissav@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 10 Dec 2012 18:45:58 +0000
Subject: [PATCH] Save list of failed nodes

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@14608 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/DSHCLI.pm | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/perl-xCAT/xCAT/DSHCLI.pm b/perl-xCAT/xCAT/DSHCLI.pm
index bfa68e36a..dc156c763 100644
--- a/perl-xCAT/xCAT/DSHCLI.pm
+++ b/perl-xCAT/xCAT/DSHCLI.pm
@@ -283,6 +283,10 @@ sub execute_dcp
                         \@targets_waiting, \%targets_active
                         );
     }
+    if (scalar(@targets_failed) > 0)
+    {
+          $::DCP_NODES_FAILED = join ",", @targets_failed;
+    }
 
     return (scalar(@targets_failed) + scalar(keys(%unresolved_targets)));
 }
@@ -395,13 +399,11 @@ sub execute_dsh
     @targets_failed =
       xCAT::DSHCLI->_execute_dsh($options, \%resolved_targets,
                                  \%unresolved_targets, \%context_targets);
-    if ($::DSH_API)
+    if (scalar(@targets_failed) > 0)
     {
-        if (scalar(@targets_failed) > 0)
-        {
-            $::DSH_API_NODES_FAILED = join ",", @targets_failed;
-        }
+          $::DSH_NODES_FAILED = join ",", @targets_failed;
     }
+
     return (scalar(@targets_failed) + scalar(keys(%unresolved_targets)));
 }