From c269fa50b603fbdcdbf5e36081f05835442fb1e5 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Tue, 26 Apr 2011 16:54:41 +0000
Subject: [PATCH] Third fix for nodelist.status

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

diff --git a/perl-xCAT/xCAT/NodeRange.pm b/perl-xCAT/xCAT/NodeRange.pm
index 78719d536..dd17c1dfe 100644
--- a/perl-xCAT/xCAT/NodeRange.pm
+++ b/perl-xCAT/xCAT/NodeRange.pm
@@ -136,10 +136,11 @@ sub nodesbycriteria {
         }
        if ($tab eq "nodelist") { #fun caching interaction
 	 my $neednewcache=0;
-	 foreach (@cols) {
-	   unless (grep /^$_\z/,@cachedcolumns) {
+	 my $nlcol;
+	 foreach $nlcol (@cols) {
+	   unless (grep /^$nlcol\z/,@cachedcolumns) {
 	     $neednewcache=1;
-	     push @cachedcolumns,$_;
+	     push @cachedcolumns,$nlcol;
 	   }
 	 }
 	 if ($neednewcache) {