From c84997d8d5615e1fcbfcf07bba1ad4beae67208c Mon Sep 17 00:00:00 2001
From: lissav <lissav@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Tue, 15 Dec 2009 23:55:12 +0000
Subject: [PATCH] add path to pping and error processing
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4795 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
perl-xCAT/xCAT/DSHCore.pm | 7 ++++++-
1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/perl-xCAT/xCAT/DSHCore.pm b/perl-xCAT/xCAT/DSHCore.pm
index 1ee93522f..77e13d8e9 100644
--- a/perl-xCAT/xCAT/DSHCore.pm
+++ b/perl-xCAT/xCAT/DSHCore.pm
@@ -706,7 +706,12 @@ sub pping_hostnames
my $hostname_list = join ",", @hostnames;
my @output =
- xCAT::Utils->runcmd("pping $hostname_list", -1);
+ xCAT::Utils->runcmd("/opt/xcat/bin/pping $hostname_list", -1);
+ if ($::RUNCMD_RC !=0) {
+ my $rsp={};
+ $rsp->{data}->[0] = "Error from pping";
+ xCAT::MsgUtils->message("I", $rsp, $::CALLBACK);
+ }
$::RUNCMD_RC =0; # reset
my @no_response = ();
foreach my $line (@output)