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

(-)a/misc/translator/LangInstaller.pm (-16 / +9 lines)
Lines 101-111 sub new { Link Here
101
            dir    => $context->config('intrahtdocs') . '/prog',
101
            dir    => $context->config('intrahtdocs') . '/prog',
102
            suffix => '-staff-prog.po',
102
            suffix => '-staff-prog.po',
103
        },
103
        },
104
        {
105
            name   => 'Intranet prog help',
106
            dir    => $context->config('intrahtdocs') . '/prog/en/modules/help',
107
            suffix => '-staff-help.po',
108
        },
109
    ];
104
    ];
110
105
111
    # OPAC themes
106
    # OPAC themes
Lines 368-378 sub install_tmpl { Link Here
368
                "    With: $self->{path_po}/$self->{lang}$trans->{suffix}\n"
363
                "    With: $self->{path_po}/$self->{lang}$trans->{suffix}\n"
369
                if $self->{verbose};
364
                if $self->{verbose};
370
365
371
            my $trans_dir = ( $trans->{name} =~ /help/ )?"$t_dir":"$t_dir/en/";
366
            my $trans_dir = "$t_dir/en/";
372
            my $lang_dir  = ( $trans->{name} =~ /help/ )?"$t_dir":"$t_dir/$self->{lang}";
367
            my $lang_dir  = "$t_dir/$self->{lang}";
373
            $lang_dir =~ s|/en/|/$self->{lang}/|;
368
            $lang_dir =~ s|/en/|/$self->{lang}/|;
374
            mkdir $lang_dir unless -d $lang_dir;
369
            mkdir $lang_dir unless -d $lang_dir;
375
            my $excludes = ( $trans->{name} !~ /help/   )?"":"-x 'help'";
370
            my $excludes  = "";
376
            # if installing MARC po file, only touch corresponding files
371
            # if installing MARC po file, only touch corresponding files
377
            my $marc     = ( $trans->{name} =~ /MARC/ )?"-m \"$trans->{name}\"":"";            # for MARC translations
372
            my $marc     = ( $trans->{name} =~ /MARC/ )?"-m \"$trans->{name}\"":"";            # for MARC translations
378
            # if not installing MARC po file, ignore all MARC files
373
            # if not installing MARC po file, ignore all MARC files
Lines 405-413 sub update_tmpl { Link Here
405
            "    To  : $self->{path_po}/$self->{lang}$trans->{suffix}\n"
400
            "    To  : $self->{path_po}/$self->{lang}$trans->{suffix}\n"
406
                if $self->{verbose};
401
                if $self->{verbose};
407
402
408
        my $trans_dir = ( $trans->{name} =~ /help/ )?"$trans->{dir}":join("/en/ -i ",split(" ",$trans->{dir}))."/en/"; # multiple source dirs
403
        my $trans_dir = join("/en/ -i ",split(" ",$trans->{dir}))."/en/"; # multiple source dirs
409
        # do no process 'help' dirs unless needed
404
        my $excludes  = "";
410
        my $excludes  = ( $trans->{name} !~ /help/ )?"-x help":"";
411
        # if processing MARC po file, only use corresponding files
405
        # if processing MARC po file, only use corresponding files
412
        my $marc      = ( $trans->{name} =~ /MARC/ )?"-m \"$trans->{name}\"":"";            # for MARC translations
406
        my $marc      = ( $trans->{name} =~ /MARC/ )?"-m \"$trans->{name}\"":"";            # for MARC translations
413
        # if not processing MARC po file, ignore all MARC files
407
        # if not processing MARC po file, ignore all MARC files
Lines 450-457 sub create_tmpl { Link Here
450
            "    To  : $self->{path_po}/$self->{lang}$trans->{suffix}\n"
444
            "    To  : $self->{path_po}/$self->{lang}$trans->{suffix}\n"
451
                if $self->{verbose};
445
                if $self->{verbose};
452
446
453
        my $trans_dir = ( $trans->{name} =~ /help/ )?"$trans->{dir}":join("/en/ -i ",split(" ",$trans->{dir}))."/en/"; # multiple source dirs
447
        my $trans_dir = join("/en/ -i ",split(" ",$trans->{dir}))."/en/"; # multiple source dirs
454
        my $excludes  = ( $trans->{name} !~ /help/ )?"-x help":"";
448
        my $excludes  = "";
455
        # if processing MARC po file, only use corresponding files
449
        # if processing MARC po file, only use corresponding files
456
        my $marc      = ( $trans->{name} =~ /MARC/ )?"-m \"$trans->{name}\"":"";            # for MARC translations
450
        my $marc      = ( $trans->{name} =~ /MARC/ )?"-m \"$trans->{name}\"":"";            # for MARC translations
457
        # if not processing MARC po file, ignore all MARC files
451
        # if not processing MARC po file, ignore all MARC files
Lines 628-634 appropriate directory. Link Here
628
622
629
Create 4 kinds of .po files in F<po> subdirectory:
623
Create 4 kinds of .po files in F<po> subdirectory:
630
(1) one from each theme on opac pages templates,
624
(1) one from each theme on opac pages templates,
631
(2) intranet templates and help,
625
(2) intranet templates,
632
(3) preferences, and
626
(3) preferences, and
633
(4) one for each MARC dialect.
627
(4) one for each MARC dialect.
634
628
Lines 640-646 Create 4 kinds of .po files in F<po> subdirectory: Link Here
640
Contains extracted text from english (en) OPAC templates found in
634
Contains extracted text from english (en) OPAC templates found in
641
<KOHA_ROOT>/koha-tmpl/opac-tmpl/{theme}/en/ directory.
635
<KOHA_ROOT>/koha-tmpl/opac-tmpl/{theme}/en/ directory.
642
636
643
=item F<lang>-staff-prog.po and F<lang>-staff-help.po
637
=item F<lang>-staff-prog.po and F<lang>-staff.po
644
638
645
Contains extracted text from english (en) intranet templates found in
639
Contains extracted text from english (en) intranet templates found in
646
<KOHA_ROOT>/koha-tmpl/intranet-tmpl/prog/en/ directory.
640
<KOHA_ROOT>/koha-tmpl/intranet-tmpl/prog/en/ directory.
647
- 

Return to bug 21483