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

(-)a/t/db_dependent/Koha/Library.t (-6 / +11 lines)
Lines 97-103 subtest 'smtp_server() tests' => sub { Link Here
97
};
97
};
98
98
99
subtest 'opac_info tests' => sub {
99
subtest 'opac_info tests' => sub {
100
    plan tests => 8;
100
    plan tests => 14;
101
    $schema->storage->txn_begin;
101
    $schema->storage->txn_begin;
102
    my $library01 = $builder->build_object( { class => 'Koha::Libraries' } );
102
    my $library01 = $builder->build_object( { class => 'Koha::Libraries' } );
103
    my $library02 = $builder->build_object( { class => 'Koha::Libraries' } );
103
    my $library02 = $builder->build_object( { class => 'Koha::Libraries' } );
Lines 160-180 subtest 'opac_info tests' => sub { Link Here
160
160
161
    # Start testing
161
    # Start testing
162
    my @opac_info1 = $library01->opac_info->as_list;
162
    my @opac_info1 = $library01->opac_info->as_list;
163
    is( $opac_info1[0]->content, '2', 'specific library, default language' );
163
    is( scalar @opac_info1, 2, 'specific library returns 2' );
164
    ok( ( grep { $_->content eq '2' } @opac_info1 ), 'specific library, default language' );
164
165
165
    my @opac_info2 = $library01->opac_info( { lang => 'nl-NL' } )->as_list;
166
    my @opac_info2 = $library01->opac_info( { lang => 'nl-NL' } )->as_list;
166
    is( $opac_info2[0]->content, '3', 'specific library, specific language' );
167
    is( scalar @opac_info2, 2, 'specific library with nl-NL returns 2' );
168
    ok( ( grep { $_->content eq '3' } @opac_info2 ), 'specific library, specific language' );
167
169
168
    my @opac_info3 = $library01->opac_info( { lang => 'nl-BE' } )->as_list;
170
    my @opac_info3 = $library01->opac_info( { lang => 'nl-BE' } )->as_list;
169
    is( $opac_info3[0]->content, '2', 'specific library, unknown language' );
171
    is( scalar @opac_info3, 2, 'specific library with unknown language returns 2' );
172
    ok( ( grep { $_->content eq '2' } @opac_info3 ), 'specific library, unknown language' );
170
173
171
    my @opac_info4 = $library02->opac_info->as_list;
174
    my @opac_info4 = $library02->opac_info->as_list;
175
    is( scalar @opac_info4,      1,   'unknown library returns 1' );
172
    is( $opac_info4[0]->content, '1', 'unknown library, default language' );
176
    is( $opac_info4[0]->content, '1', 'unknown library, default language' );
173
177
174
    my @opac_info5 = $library02->opac_info( { lang => 'fr-FR' } )->as_list;
178
    my @opac_info5 = $library02->opac_info( { lang => 'fr-FR' } )->as_list;
175
    is( $opac_info5[0]->content, '4', 'unknown library, specific language' );
179
    is( scalar @opac_info5, 2, 'unknown library with fr-FR returns 2' );
180
    ok( ( grep { $_->content eq '4' } @opac_info5 ), 'unknown library, specific language' );
176
181
177
    my @opac_info6 = $library02->opac_info( { lang => 'de-DE' } )->as_list;
182
    my @opac_info6 = $library02->opac_info( { lang => 'de-DE' } )->as_list;
183
    is( scalar @opac_info6,      1,   'unknown library with unknown language returns 1' );
178
    is( $opac_info6[0]->content, '1', 'unknown library, unknown language' );
184
    is( $opac_info6[0]->content, '1', 'unknown library, unknown language' );
179
185
180
    $html01->delete;
186
    $html01->delete;
181
- 

Return to bug 39482