From 564a40bc9c7b23032515889b243cef7e076383ba Mon Sep 17 00:00:00 2001
From: ligc <ligc@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 16 Apr 2010 02:55:36 +0000
Subject: [PATCH] clean  when retain_cache

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

diff --git a/perl-xCAT/xCAT/NodeRange.pm b/perl-xCAT/xCAT/NodeRange.pm
index 57cee3398..05913c0ce 100644
--- a/perl-xCAT/xCAT/NodeRange.pm
+++ b/perl-xCAT/xCAT/NodeRange.pm
@@ -415,6 +415,7 @@ sub retain_cache { #A semi private operation to be used *ONLY* in the interestin
         @allnodeset=();
         %allnodehash=();
         @grplist=();
+        $didgrouplist = 0;
         %allgrphash=();
     }
 }