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

(-)a/misc/translator/LangInstaller.pm (-17 / +12 lines)
Lines 84-91 sub new { Link Here
84
84
85
    # Get all available language codes
85
    # Get all available language codes
86
    opendir $fh, $self->{path_po};
86
    opendir $fh, $self->{path_po};
87
    my @langs =  map { ($_) =~ /(.*)-i-opac/ } 
87
    my @langs =  map { ($_) =~ /(.*)-pref/ }
88
        grep { $_ =~ /.*-opac-t-prog/ } readdir($fh);
88
        grep { $_ =~ /.*-pref/ } readdir($fh);
89
    closedir $fh;
89
    closedir $fh;
90
    $self->{langs} = \@langs;
90
    $self->{langs} = \@langs;
91
91
Lines 93-103 sub new { Link Here
93
    my $opachtdocs = $context->config('opachtdocs');
93
    my $opachtdocs = $context->config('opachtdocs');
94
    $self->{interface} = [
94
    $self->{interface} = [
95
        {
95
        {
96
            name   => 'OPAC prog',
97
            dir    => "$opachtdocs/prog",
98
            suffix => '-i-opac-t-prog-v-3006000.po',
99
        },
100
        {
101
            name   => 'Intranet prog UI',
96
            name   => 'Intranet prog UI',
102
            dir    => $context->config('intrahtdocs') . '/prog',
97
            dir    => $context->config('intrahtdocs') . '/prog',
103
            suffix => '-i-staff-t-prog-v-3006000.po',
98
            suffix => '-i-staff-t-prog-v-3006000.po',
Lines 109-121 sub new { Link Here
109
        },
104
        },
110
    ];
105
    ];
111
106
112
    # Alternate opac themes
107
    # OPAC themes
113
    opendir $fh, $context->config('opachtdocs');
108
    opendir my $dh, $context->config('opachtdocs');
114
    for ( grep { not /^\.|\.\.|prog|lib$/ } readdir($fh) ) {
109
    for my $theme ( grep { not /^\.|lib/ } readdir($dh) ) {
115
        push @{$self->{interface}}, {
110
        push @{$self->{interface}}, {
116
            name   => "OPAC $_",
111
            name   => "OPAC $theme",
117
            dir    => "$opachtdocs/$_",
112
            dir    => "$opachtdocs/$theme",
118
            suffix => "-opac-$_.po",
113
            suffix => "-opac-$theme.po",
119
        };
114
        };
120
    }
115
    }
121
116
Lines 514-522 sub install { Link Here
514
sub get_all_langs {
509
sub get_all_langs {
515
    my $self = shift;
510
    my $self = shift;
516
    opendir( my $dh, $self->{path_po} );
511
    opendir( my $dh, $self->{path_po} );
517
    my @files = grep { $_ =~ /-i-opac-t-prog-v-3006000.po$/ }
512
    my @files = grep { $_ =~ /-pref.po$/ }
518
        readdir $dh;
513
        readdir $dh;
519
    @files = map { $_ =~ s/-i-opac-t-prog-v-3006000.po$//; $_ } @files;
514
    @files = map { $_ =~ s/-pref.po$//; $_ } @files;
520
}
515
}
521
516
522
517
Lines 595-604 intranet templates, and (3) from preferences. Link Here
595
590
596
=over
591
=over
597
592
598
=item F<lang>-opac.po
593
=item F<lang>-opac-{theme}.po
599
594
600
Contains extracted text from english (en) OPAC templates found in
595
Contains extracted text from english (en) OPAC templates found in
601
<KOHA_ROOT>/koha-tmpl/opac-tmpl/prog/en/ directory.
596
<KOHA_ROOT>/koha-tmpl/opac-tmpl/{theme}/en/ directory.
602
597
603
=item F<lang>-intranet.po
598
=item F<lang>-intranet.po
604
599
(-)a/misc/translator/translate (-3 / +2 lines)
Lines 106-115 version of templates and preferences are used as references. Link Here
106
106
107
=over
107
=over
108
108
109
=item F<lang>-opac.po
109
=item F<lang>-opac-{theme}.po
110
110
111
Contains extracted text from english (en) OPAC templates found in
111
Contains extracted text from english (en) OPAC templates found in
112
<KOHA_ROOT>/koha-tmpl/opac-tmpl/prog/en/ directory.
112
<KOHA_ROOT>/koha-tmpl/opac-tmpl/{theme}/en/ directory.
113
113
114
=item F<lang>-intranet.po
114
=item F<lang>-intranet.po
115
115
116
- 

Return to bug 12535