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

(-)a/C4/Templates.pm (-5 / +2 lines)
Lines 277-284 sub themelanguage { Link Here
277
    my @languages = split(",", C4::Context->preference(
277
    my @languages = split(",", C4::Context->preference(
278
        $is_intranet ? 'language' : 'opaclanguages'));
278
        $is_intranet ? 'language' : 'opaclanguages'));
279
    my $lang;
279
    my $lang;
280
    $lang = $query->cookie('KohaOpacLanguage')
280
    $lang = getlanguagecookie;    
281
        if defined $query and $query->cookie('KohaOpacLanguage');
282
    unless ($lang) {
281
    unless ($lang) {
283
        my $http_accept_language = $ENV{ HTTP_ACCEPT_LANGUAGE };
282
        my $http_accept_language = $ENV{ HTTP_ACCEPT_LANGUAGE };
284
        $lang = accept_language( $http_accept_language, 
283
        $lang = accept_language( $http_accept_language, 
Lines 327-334 sub getlanguagecookie { Link Here
327
        $lang = $ENV{HTTP_ACCEPT_LANGUAGE};
326
        $lang = $ENV{HTTP_ACCEPT_LANGUAGE};
328
        
327
        
329
    }
328
    }
330
    $lang = substr($lang, 0, 2);
329
    $lang =~ s/[^a-zA-Z_-]*//; #sanitzie
331
332
    return $lang;
330
    return $lang;
333
}
331
}
334
332
335
- 

Return to bug 6629