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 898-904 if ( defined $min ) { Link Here
898
}
898
}
899
899
900
if ( C4::Context->preference('TranslateNotices') ) {
900
if ( C4::Context->preference('TranslateNotices') ) {
901
    my $translated_languages = C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('template') );
901
    my $translated_languages = C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('opacthemes') );
902
    $template->param( languages => $translated_languages );
902
    $template->param( languages => $translated_languages );
903
}
903
}
904
904
(-)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 90-96 if( $opac_messaging && C4::Context->preference("SMSSendDriver") eq 'Email' ) { Link Here
90
my $new_session_id = $query->cookie('CGISESSID');
90
my $new_session_id = $query->cookie('CGISESSID');
91
91
92
if ( C4::Context->preference('TranslateNotices') ) {
92
if ( C4::Context->preference('TranslateNotices') ) {
93
    my $translated_languages = C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('template') );
93
    my $translated_languages = C4::Languages::getTranslatedLanguages( 'opac', C4::Context->preference('opacthemes') );
94
    $template->param(
94
    $template->param(
95
        languages => $translated_languages,
95
        languages => $translated_languages,
96
        patron_lang => $patron->lang,
96
        patron_lang => $patron->lang,
(-)a/t/db_dependent/Languages.t (-3 / +2 lines)
Lines 47-53 $languages = C4::Languages::getLanguages('eng', 1); Link Here
47
is(scalar(@$languages), 2, 'getLanguages() filtering using AdvancedSearchLanguages works');
47
is(scalar(@$languages), 2, 'getLanguages() filtering using AdvancedSearchLanguages works');
48
48
49
my $translatedlanguages1;
49
my $translatedlanguages1;
50
warnings_are { $translatedlanguages1 = C4::Languages::getTranslatedLanguages( 'opac', 'prog' ) }
50
warnings_are { $translatedlanguages1 = C4::Languages::getTranslatedLanguages('opac') }
51
             [],
51
             [],
52
             'no warnings for calling getTranslatedLanguages';
52
             'no warnings for calling getTranslatedLanguages';
53
my @currentcheck1 = map { $_->{current} } @$translatedlanguages1;
53
my @currentcheck1 = map { $_->{current} } @$translatedlanguages1;
Lines 55-61 my $onlyzeros = first { $_ != 0 } @currentcheck1; Link Here
55
ok(! $onlyzeros, "Everything was zeros.\n");
55
ok(! $onlyzeros, "Everything was zeros.\n");
56
56
57
my $translatedlanguages2;
57
my $translatedlanguages2;
58
warnings_are { $translatedlanguages2 = C4::Languages::getTranslatedLanguages( 'opac', 'prog', 'en' ) }
58
warnings_are { $translatedlanguages2 = C4::Languages::getTranslatedLanguages( 'opac', undef, 'en' ) }
59
             [],
59
             [],
60
             'no warnings for calling getTranslatedLanguages';
60
             'no warnings for calling getTranslatedLanguages';
61
my @currentcheck2 = map { $_->{current} } @$translatedlanguages2;
61
my @currentcheck2 = map { $_->{current} } @$translatedlanguages2;
62
- 

Return to bug 38903