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

(-)a/Koha/Notice/Template.pm (-4 / +2 lines)
Lines 44-53 sub get_default { Link Here
44
    my $self = shift;
44
    my $self = shift;
45
    my $lang = $self->lang;
45
    my $lang = $self->lang;
46
    if ( $lang eq 'default' ) {
46
    if ( $lang eq 'default' ) {
47
        my $translated_languages = C4::Languages::getTranslatedLanguages(
47
        my $translated_languages =
48
            'opac',
48
            C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('opacthemes') );
49
            C4::Context->preference('template')
50
        );
51
        $lang = @{ @{$translated_languages}[0]->{sublanguages_loop} }[0]->{rfc4646_subtag};
49
        $lang = @{ @{$translated_languages}[0]->{sublanguages_loop} }[0]->{rfc4646_subtag};
52
    }
50
    }
53
51
(-)a/members/memberentry.pl (-1 / +1 lines)
Lines 934-940 if ( defined $min ) { Link Here
934
}
934
}
935
935
936
if ( C4::Context->preference('TranslateNotices') ) {
936
if ( C4::Context->preference('TranslateNotices') ) {
937
    my $translated_languages = C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('template') );
937
    my $translated_languages = C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('opacthemes') );
938
    $template->param( languages => $translated_languages );
938
    $template->param( languages => $translated_languages );
939
}
939
}
940
940
(-)a/opac/opac-memberentry.pl (-1 / +1 lines)
Lines 100-106 if ( defined $min ) { Link Here
100
    );
100
    );
101
}
101
}
102
102
103
my $translated_languages = C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('template') );
103
my $translated_languages = C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('opacthemes') );
104
104
105
$template->param(
105
$template->param(
106
    op                => $op,
106
    op                => $op,
(-)a/opac/opac-messaging.pl (-1 / +1 lines)
Lines 97-103 if ( $opac_messaging && C4::Context->preference("SMSSendDriver") eq 'Email' ) { Link Here
97
my $new_session_id = $query->cookie('CGISESSID');
97
my $new_session_id = $query->cookie('CGISESSID');
98
98
99
if ( C4::Context->preference('TranslateNotices') ) {
99
if ( C4::Context->preference('TranslateNotices') ) {
100
    my $translated_languages = C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('template') );
100
    my $translated_languages = C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('opacthemes') );
101
    $template->param(
101
    $template->param(
102
        languages   => $translated_languages,
102
        languages   => $translated_languages,
103
        patron_lang => $patron->lang,
103
        patron_lang => $patron->lang,
(-)a/t/db_dependent/Languages.t (-3 / +2 lines)
Lines 56-62 $languages = C4::Languages::getLanguages( 'eng', 1 ); Link Here
56
is( scalar(@$languages), 2, 'getLanguages() filtering using AdvancedSearchLanguages works' );
56
is( scalar(@$languages), 2, 'getLanguages() filtering using AdvancedSearchLanguages works' );
57
57
58
my $translatedlanguages1;
58
my $translatedlanguages1;
59
warnings_are { $translatedlanguages1 = C4::Languages::getTranslatedLanguages( 'opac', 'prog' ) }
59
warnings_are { $translatedlanguages1 = C4::Languages::getTranslatedLanguages('opac') }
60
[],
60
[],
61
    'no warnings for calling getTranslatedLanguages';
61
    'no warnings for calling getTranslatedLanguages';
62
my @currentcheck1 = map { $_->{current} } @$translatedlanguages1;
62
my @currentcheck1 = map { $_->{current} } @$translatedlanguages1;
Lines 64-70 my $onlyzeros = first { $_ != 0 } @currentcheck1; Link Here
64
ok( !$onlyzeros, "Everything was zeros.\n" );
64
ok( !$onlyzeros, "Everything was zeros.\n" );
65
65
66
my $translatedlanguages2;
66
my $translatedlanguages2;
67
warnings_are { $translatedlanguages2 = C4::Languages::getTranslatedLanguages( 'opac', 'prog', 'en' ) }
67
warnings_are { $translatedlanguages2 = C4::Languages::getTranslatedLanguages( 'opac', undef, 'en' ) }
68
[],
68
[],
69
    'no warnings for calling getTranslatedLanguages';
69
    'no warnings for calling getTranslatedLanguages';
70
my @currentcheck2 = map { $_->{current} } @$translatedlanguages2;
70
my @currentcheck2 = map { $_->{current} } @$translatedlanguages2;
71
- 

Return to bug 38903