From 8717c5e5ad7688c6492d0f464a82ee0789f2b4eb Mon Sep 17 00:00:00 2001
From: sakolish <sakolish@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Thu, 14 Feb 2008 19:58:48 +0000
Subject: [PATCH] Use GlobalDef $::NODETYPE_XXX - Line #60

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

diff --git a/perl-xCAT-2.0/xCAT/PPCdb.pm b/perl-xCAT-2.0/xCAT/PPCdb.pm
index acd18805f..306432734 100644
--- a/perl-xCAT-2.0/xCAT/PPCdb.pm
+++ b/perl-xCAT-2.0/xCAT/PPCdb.pm
@@ -4,6 +4,7 @@ package xCAT::PPCdb;
 use strict;
 use Getopt::Long;
 use xCAT::Table;
+use xCAT::GlobalDef;
 
 
 ##########################################################################
@@ -57,9 +58,9 @@ sub add_ppc {
             ###########################
             my ($k1,$u1);
             my %nodetype = ( 
-                 fsp  => "fsp",
-                 bpa  => "bpa",
-                 lpar => "lpar,osi"
+                 fsp  => $::NODETYPE_FSP,
+                 bpa  => $::NODETYPE_BPA,
+                 lpar =>"$::NODETYPE_LPAR,$::NODETYPE_OSI"
             );
             $k1->{node}     = $name;
             $u1->{groups}   = lc($hwtype).",all";
@@ -275,3 +276,4 @@ sub credentials {
 
 
 
+