Lines 20-26
Link Here
|
20 |
|
20 |
|
21 |
use Modern::Perl; |
21 |
use Modern::Perl; |
22 |
use Test::NoWarnings; |
22 |
use Test::NoWarnings; |
23 |
use Test::More tests => 10; |
23 |
use Test::More tests => 12; |
24 |
use C4::Context; |
24 |
use C4::Context; |
25 |
use Koha::Database; |
25 |
use Koha::Database; |
26 |
|
26 |
|
Lines 54-59
C4::Context->set_preference( 'testpreference', 'abc' );
Link Here
|
54 |
C4::Context->delete_preference('testpreference'); |
54 |
C4::Context->delete_preference('testpreference'); |
55 |
is( C4::Context->preference('testpreference'), undef, 'deleting preferences' ); |
55 |
is( C4::Context->preference('testpreference'), undef, 'deleting preferences' ); |
56 |
|
56 |
|
|
|
57 |
C4::Context->set_preference( 'testpreference', 'abc' ); |
58 |
is( C4::Context->preference('testpreference'), 'abc', 'testpreference set to abc' ); |
59 |
C4::Context->set_preference( 'testpreference', undef ); |
60 |
is( C4::Context->preference('testpreference'), undef, 'deleting preferences' ); |
61 |
|
57 |
# Test delete_preference, check cache; we need an example here with MIXED case ! |
62 |
# Test delete_preference, check cache; we need an example here with MIXED case ! |
58 |
C4::Context->enable_syspref_cache; |
63 |
C4::Context->enable_syspref_cache; |
59 |
C4::Context->set_preference( 'TestPreference', 'def' ); |
64 |
C4::Context->set_preference( 'TestPreference', 'def' ); |
60 |
- |
|
|