From 1f6d451c676e79fdacd0f75d5be535b89ca85ff2 Mon Sep 17 00:00:00 2001
From: zhaoertao <zhaoertao@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Tue, 6 Mar 2012 07:55:45 +0000
Subject: [PATCH] fix bug about Table::getNodeSpecAttribs

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

diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm
index bfcaaf780..cbde2d920 100644
--- a/perl-xCAT/xCAT/Table.pm
+++ b/perl-xCAT/xCAT/Table.pm
@@ -2348,7 +2348,7 @@ sub getNodeSpecAttribs {
     my @keys = ();
     if (ref $_[0] eq 'HASH') {
         %options = %{shift()};
-        @attribs = @{shift()};
+        @attribs = @_;
         foreach my $key (keys %options) {
             if (!grep(/^$key$/, @attribs)) {
                 push @attribs, $key;