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

(-)a/C4/Languages.pm (-5 lines)
Lines 397-406 sub _build_languages_arrayref { Link Here
397
            # group this language, key by langtag
397
            # group this language, key by langtag
398
            $language_subtags_hashref->{'sublanguage_current'} = 1 if $translated_language eq $current_language;
398
            $language_subtags_hashref->{'sublanguage_current'} = 1 if $translated_language eq $current_language;
399
            $language_subtags_hashref->{'rfc4646_subtag'} = $translated_language;
399
            $language_subtags_hashref->{'rfc4646_subtag'} = $translated_language;
400
            $language_subtags_hashref->{'native_description'} = language_get_description($language_subtags_hashref->{language},$language_subtags_hashref->{language},'language');
401
            $language_subtags_hashref->{'script_description'} = language_get_description($language_subtags_hashref->{script},$language_subtags_hashref->{'language'},'script');
402
            $language_subtags_hashref->{'region_description'} = language_get_description($language_subtags_hashref->{region},$language_subtags_hashref->{'language'},'region');
403
            $language_subtags_hashref->{'variant_description'} = language_get_description($language_subtags_hashref->{variant},$language_subtags_hashref->{'language'},'variant');
404
            $track_language_groups->{$language_subtags_hashref->{'language'}}++;
400
            $track_language_groups->{$language_subtags_hashref->{'language'}}++;
405
            push ( @{ $language_groups->{$language_subtags_hashref->{language}} }, $language_subtags_hashref );
401
            push ( @{ $language_groups->{$language_subtags_hashref->{language}} }, $language_subtags_hashref );
406
        }
402
        }
Lines 416-422 sub _build_languages_arrayref { Link Here
416
            push @languages_loop,  {
412
            push @languages_loop,  {
417
                            # this is only use if there is one
413
                            # this is only use if there is one
418
                            rfc4646_subtag => @$value[0]->{rfc4646_subtag},
414
                            rfc4646_subtag => @$value[0]->{rfc4646_subtag},
419
                            native_description => language_get_description($key,$key,'language'),
420
                            language => $key,
415
                            language => $key,
421
                            sublanguages_loop => $value,
416
                            sublanguages_loop => $value,
422
                            plural => $track_language_groups->{$key} >1 ? 1 : 0,
417
                            plural => $track_language_groups->{$key} >1 ? 1 : 0,
(-)a/C4/Templates.pm (-2 / +1 lines)
Lines 32-38 use List::MoreUtils qw/ any uniq /; Link Here
32
use base qw(Class::Accessor);
32
use base qw(Class::Accessor);
33
use Template;
33
use Template;
34
use Template::Constants qw( :debug );
34
use Template::Constants qw( :debug );
35
use C4::Languages qw(getTranslatedLanguages get_bidi regex_lang_subtags language_get_description accept_language );
35
use C4::Languages qw(getTranslatedLanguages get_bidi regex_lang_subtags accept_language );
36
36
37
use C4::Context;
37
use C4::Context;
38
38
39
- 

Return to bug 12017