From 704ef6932c4dce4f9e0593009180a7be5f0110b0 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 16 May 2012 16:42:44 +0000
Subject: [PATCH] Have build_cache never consider an older than 5 second cache
 valid

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

diff --git a/perl-xCAT/xCAT/Table.pm b/perl-xCAT/xCAT/Table.pm
index feede9def..ded945371 100644
--- a/perl-xCAT/xCAT/Table.pm
+++ b/perl-xCAT/xCAT/Table.pm
@@ -2159,6 +2159,9 @@ sub _build_cache { #PRIVATE FUNCTION, PLEASE DON'T CALL DIRECTLY
 	      last;
 	   }
 	}
+        if ($self->{_cachestamp} < (time()-5)) { #NEVER use a cache older than 5 seconds
+		$cachesufficient=0;
+	}
 	if ($cachesufficient) { return; }
 	#cache is insufficient, now we must do the converse of above
 	#must add any currently cached columns to new list if not requested