From b867d7d12adb98f42b473bc850927e1535a6ab6c Mon Sep 17 00:00:00 2001 From: Julian Maurice Date: Mon, 2 Jan 2012 10:45:55 +0100 Subject: [PATCH] Bug 6132: Update sysprefs cache in set_preference Signed-off-by: Chris Cormack --- C4/Context.pm | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/C4/Context.pm b/C4/Context.pm index 7581faa0fb..659ba05344 100644 --- a/C4/Context.pm +++ b/C4/Context.pm @@ -514,7 +514,7 @@ the sysprefs cache. sub set_preference { my $self = shift; - my $var = shift; + my $var = lc(shift); my $value = shift; my $dbh = C4::Context->dbh or return 0; @@ -530,7 +530,9 @@ sub set_preference { ON DUPLICATE KEY UPDATE value = VALUES(value) " ); - $sth->execute( $var, $value ); + if($sth->execute( $var, $value )) { + $sysprefs{$var} = $value; + } $sth->finish; } -- 2.39.5