Koha-community/Koha
13
7
Fork 0
Code Issues Releases Wiki Activity

Bug 36793: Unit test

Browse source 
This only applies to 'local' preferences.

Test plan:
Run sysprefs.t with/without second patch.

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Signed-off-by: Katrin Fischer <katrin.fischer@bsz-bw.de>
(cherry picked from commit b77cb006f1)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
Marcel de Rooy 2024-05-06 12:28:45 +00:00 committed by Fridolin Somers
parent b485b949f4
commit d39200e0d6
1 changed files with 8 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

15
t/db_dependent/sysprefs.t
View file

@ -19,7 +19,7 @@
# along with Koha; if not, see <http://www.gnu.org/licenses>.
use Modern::Perl;
use Test::More tests => 8;
use Test::More tests => 9;
use C4::Context;
use Koha::Database;
@ -53,9 +53,10 @@ C4::Context->set_preference('testpreference', 'abc');
C4::Context->delete_preference('testpreference');
is(C4::Context->preference('testpreference'), undef, 'deleting preferences');
C4::Context->set_preference('testpreference', 'def');
# Delete from the database, it should still be in cache
$dbh->do("DELETE FROM systempreferences WHERE variable='testpreference'");
is(C4::Context->preference('testpreference'), 'def', 'caching preferences');
C4::Context->clear_syspref_cache();
is(C4::Context->preference('testpreference'), undef, 'clearing preference cache');
# Test delete_preference, check cache; we need an example here with MIXED case !
C4::Context->enable_syspref_cache;
C4::Context->set_preference( 'TestPreference', 'def' );
is( C4::Context->preference('testpreference'), 'def', 'lower case, got right value' );
C4::Context->delete_preference('TestPreference');
is( C4::Context->preference('TestPreference'), undef, 'mixed case, cache is cleared' );
is( C4::Context->preference('testpreference'), undef, 'lower case, cache is cleared' );