From 8ccc09febdae86d9cb1d98f37b0e77474d4526cd Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Sat, 21 Nov 2009 18:38:59 +0000
Subject: [PATCH] -Fix use of nodech to manipulate columns that are not 'node'
 but act like 'node (bug 2785190)

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

diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm
index bc1c4601b..026dc3e9e 100644
--- a/perl-xCAT/xCAT/Table.pm
+++ b/perl-xCAT/xCAT/Table.pm
@@ -921,7 +921,11 @@ sub setNodeAttribs
 {
     my $self = shift;
     my $node = shift;
-    return $self->setAttribs({'node' => $node}, @_);
+    my $nodekey = "node";
+    if (defined $xCAT::Schema::tabspec{$self->{tabname}}->{nodecol}) {
+        $nodekey = $xCAT::Schema::tabspec{$self->{tabname}}->{nodecol}
+    };
+    return $self->setAttribs({$nodekey => $node}, @_);
 }
 
 #--------------------------------------------------------------------------