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
This commit is contained in:
parent
ff00b0716e
commit
1f6d451c67
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user