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

(-)a/t/db_dependent/Languages.t (-5 / +4 lines)
Lines 1-6 Link Here
1
#!/usr/bin/perl
1
#!/usr/bin/perl
2
#
2
#
3
# This Koha test module is a stub! 
3
# This Koha test module is a stub!
4
# Add more tests here!!!
4
# Add more tests here!!!
5
use utf8;
5
use utf8;
6
use Modern::Perl;
6
use Modern::Perl;
Lines 157-163 subtest 'getLanguages()' => sub { Link Here
157
            'subtag'               => 'en',
157
            'subtag'               => 'en',
158
            'iso639_2_code'        => 'eng',
158
            'iso639_2_code'        => 'eng',
159
            'description'          => 'English',
159
            'description'          => 'English',
160
            'language_description' => 'English (English)',
160
            'language_description' => 'English',
161
            'type'                 => 'language'
161
            'type'                 => 'language'
162
        },
162
        },
163
        {
163
        {
Lines 188-194 subtest 'getLanguages()' => sub { Link Here
188
    );
188
    );
189
189
190
    # Test 2: Specific language without full translations
190
    # Test 2: Specific language without full translations
191
    $expected->[2]->{language_description} = "Español (Español)";
191
    $expected->[2]->{language_description} = "Español";
192
    $languages = getLanguages('es');
192
    $languages = getLanguages('es');
193
    cmp_deeply(
193
    cmp_deeply(
194
        $languages, $expected,
194
        $languages, $expected,
Lines 197-203 subtest 'getLanguages()' => sub { Link Here
197
197
198
    # Test 3: Specific language with translations
198
    # Test 3: Specific language with translations
199
    $expected->[0]->{language_description} = "Anglais (English)";
199
    $expected->[0]->{language_description} = "Anglais (English)";
200
    $expected->[1]->{language_description} = "Français (Français)";
200
    $expected->[1]->{language_description} = "Français";
201
    $expected->[2]->{language_description} = "Espagnol (Español)";
201
    $expected->[2]->{language_description} = "Espagnol (Español)";
202
    $languages                             = getLanguages('fr');
202
    $languages                             = getLanguages('fr');
203
    cmp_deeply(
203
    cmp_deeply(
204
- 

Return to bug 38646