From 94d4275e8582e01831987c47df65eab3594bc3b5 Mon Sep 17 00:00:00 2001
From: nott <nott@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 3 Aug 2009 13:07:06 +0000
Subject: [PATCH] Temporary fix for perl INC path issue.

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@3926 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT/postscripts/servicenode | 10 ++++++++++
 xCAT/postscripts/xcataixpost |  9 +++++++++
 2 files changed, 19 insertions(+)

diff --git a/xCAT/postscripts/servicenode b/xCAT/postscripts/servicenode
index 39859ea33..19604f356 100755
--- a/xCAT/postscripts/servicenode
+++ b/xCAT/postscripts/servicenode
@@ -21,6 +21,16 @@ BEGIN
 {
     $::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : '/opt/xcat';
 }
+
+# if AIX - make sure we include perl 5.8.2 in INC path.
+#       Needed to find perl dependencies shipped in deps tarball.
+if ($^O =~ /^aix/i) {
+        use lib "/usr/opt/perl5/lib/5.8.2/aix-thread-multi";
+        use lib "/usr/opt/perl5/lib/5.8.2";
+        use lib "/usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi";
+        use lib "/usr/opt/perl5/lib/site_perl/5.8.2";
+}
+
 use lib "$::XCATROOT/lib/perl";
 
 # MAIN
diff --git a/xCAT/postscripts/xcataixpost b/xCAT/postscripts/xcataixpost
index fb996038d..57ad7830a 100755
--- a/xCAT/postscripts/xcataixpost
+++ b/xCAT/postscripts/xcataixpost
@@ -12,6 +12,15 @@
 #
 #####################################################
 
+# if AIX - make sure we include perl 5.8.2 in INC path.
+#       Needed to find perl dependencies shipped in deps tarball.
+if ($^O =~ /^aix/i) {
+        use lib "/usr/opt/perl5/lib/5.8.2/aix-thread-multi";
+        use lib "/usr/opt/perl5/lib/5.8.2";
+        use lib "/usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi";
+        use lib "/usr/opt/perl5/lib/site_perl/5.8.2";
+}
+
 use File::Path;
 use IO::Socket;
 my $useSocketSSL=eval { require IO::Socket::SSL; };