From 94516e7f2a4c8ff1026e0a4a4ef9cefb9fe0c23d Mon Sep 17 00:00:00 2001 From: Chris Cormack Date: Wed, 7 Dec 2011 11:07:23 +1300 Subject: [PATCH] Bug 7276 : Follow up, adding a sub to clear the cache Signed-off-by: Paul Poulain --- C4/SQLHelper.pm | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) diff --git a/C4/SQLHelper.pm b/C4/SQLHelper.pm index 900e40dba5..41c5a9f5c1 100644 --- a/C4/SQLHelper.pm +++ b/C4/SQLHelper.pm @@ -54,6 +54,7 @@ BEGIN { SearchInTable UpdateInTable GetPrimaryKeys + clear_columns_cache ); %EXPORT_TAGS = ( all =>[qw( InsertInTable DeleteInTable SearchInTable UpdateInTable GetPrimaryKeys)] ); @@ -252,6 +253,23 @@ sub GetPrimaryKeys($) { return grep { $hash_columns->{$_}->{'Key'} =~/PRI/i} keys %$hash_columns; } + +=head2 clear_columns_cache + + C4::SQLHelper->clear_columns_cache(); + +cleans the internal cache of sysprefs. Please call this method if +you update a tables structure. Otherwise, your new changes +will not be seen by this process. + +=cut + +sub clear_columns_cache { + %$hashref = (); +} + + + =head2 _get_columns _get_columns($tablename) -- 2.39.5