From b3ee515007313c26bedd3a3e0cd91a0d3ccafd6c Mon Sep 17 00:00:00 2001
From: sakolish <sakolish@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Thu, 14 Feb 2008 19:11:31 +0000
Subject: [PATCH] Removed absolute path when invoking lpar_netboot.expect -
 Line #159

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@480 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT-2.0/xCAT/PPCboot.pm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/perl-xCAT-2.0/xCAT/PPCboot.pm b/perl-xCAT-2.0/xCAT/PPCboot.pm
index c20e567ba..2bab483a3 100644
--- a/perl-xCAT-2.0/xCAT/PPCboot.pm
+++ b/perl-xCAT-2.0/xCAT/PPCboot.pm
@@ -145,13 +145,19 @@ sub ivm_rnetboot {
     my $ssh     = @$exp[0];
     my $userid  = @$exp[4];
     my $pw      = @$exp[5];
-    my $cmd     = "/opt/xcat/sbin/lpar_netboot.expect";
+    my $cmd;
     my $result;
 
     #######################################
     # Disconnect Expect session
     #######################################
     xCAT::PPCcli::disconnect( $exp );
+    
+    #######################################
+    # Find Expect script 
+    #######################################
+    $cmd = ($::XCATROOT) ? "$::XCATROOT/sbin/" : "/opt/xcat/sbin/";
+    $cmd .= "lpar_netboot.expect"; 
 
     #######################################
     # Check command installed