From 3ba65abb51a31f4c0fbe094e8e8a918b4b181788 Mon Sep 17 00:00:00 2001
From: sakolish <sakolish@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 13 Feb 2008 19:56:35 +0000
Subject: [PATCH] Added xCAT PATH - Line #5

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@469 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server-2.0/share/xcat/cons/hmc | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/xCAT-server-2.0/share/xcat/cons/hmc b/xCAT-server-2.0/share/xcat/cons/hmc
index 389451341..a93a9c875 100644
--- a/xCAT-server-2.0/share/xcat/cons/hmc
+++ b/xCAT-server-2.0/share/xcat/cons/hmc
@@ -1,6 +1,10 @@
 #!/usr/bin/env perl
 # IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
-
+BEGIN
+{
+    $::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : '/opt/xcat';
+}
+use lib "$::XCATROOT/lib/perl";
 use strict;
 use Getopt::Long;
 use xCAT::Table;