View | Details | Raw Unified | Return to bug 10132
Collapse All | Expand All

(-)a/t/db_dependent/Koha/Libraries.t (-6 / +30 lines)
Lines 19-25 Link Here
19
19
20
use Modern::Perl;
20
use Modern::Perl;
21
21
22
use Test::More tests => 11;
22
use Test::More tests => 10;
23
23
24
use Koha::Library;
24
use Koha::Library;
25
use Koha::Libraries;
25
use Koha::Libraries;
Lines 88-95 is( Koha::Libraries->search->count, $nb_of_libraries + 1, 'Delete should have de Link Here
88
$retrieved_category_2->delete;
88
$retrieved_category_2->delete;
89
is( Koha::LibraryCategories->search->count, $nb_of_categories + 2, 'Delete should have deleted the library category' );
89
is( Koha::LibraryCategories->search->count, $nb_of_categories + 2, 'Delete should have deleted the library category' );
90
90
91
t::lib::Mocks::mock_preference('MARCOrgCode', 'US-Default');
92
is( $new_library_1->get_effective_marcorgcode, 'US-MyLib', 'If defined, use library\'s own marc org code');
93
is( $new_library_2->get_effective_marcorgcode, 'US-Default', 'If not defined library\' marc org code, use the one from system preferences');
94
95
$schema->storage->txn_rollback;
91
$schema->storage->txn_rollback;
96
- 
92
93
subtest '->get_effective_marcorgcode' => sub {
94
95
    plan tests => 4;
96
97
    $schema->storage->txn_begin;
98
99
    my $library_1 = $builder->build_object({ class => 'Koha::Libraries',
100
                                             value => { marcorgcode => 'US-MyLib' } });
101
    my $library_2 = $builder->build_object({ class => 'Koha::Libraries',
102
                                             value => { marcorgcode => undef } });
103
104
    t::lib::Mocks::mock_preference('MARCOrgCode', 'US-Default');
105
106
    is( $library_1->get_effective_marcorgcode, 'US-MyLib',
107
       'If defined, use library\'s own marc org code');
108
    is( $library_2->get_effective_marcorgcode, 'US-Default',
109
       'If not defined library\' marc org code, use the one from system preferences');
110
111
    t::lib::Mocks::mock_preference('MARCOrgCode', 'Blah');
112
    is( $library_2->get_effective_marcorgcode, 'Blah',
113
       'Fallback is always MARCOrgCode syspref');
114
115
    $library_2->marcorgcode('ThisIsACode')->store();
116
    is( $library_2->get_effective_marcorgcode, 'ThisIsACode',
117
       'Pick library_2 code');
118
119
    $schema->storage->txn_rollback;
120
};

Return to bug 10132