diff options
author | Manuel Pégourié-Gonnard <mpg@elzevir.fr> | 2010-07-16 14:43:39 +0000 |
---|---|---|
committer | Manuel Pégourié-Gonnard <mpg@elzevir.fr> | 2010-07-16 14:43:39 +0000 |
commit | 60ac6377e8e1c294355476e59006328f211fd810 (patch) | |
tree | b593658b3a7775ba849e70c63ac1a9082c72b331 /Master/tlpkg/installer | |
parent | 7cbfc915e83083abb33fe940efda460956eaf9f6 (diff) |
Translate shortdesc of schemes and collections in the perltk installer.
git-svn-id: svn://tug.org/texlive/trunk@19479 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer')
-rw-r--r-- | Master/tlpkg/installer/install-menu-perltk.pl | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl index 7321c91bdc9..7f75d0e2907 100644 --- a/Master/tlpkg/installer/install-menu-perltk.pl +++ b/Master/tlpkg/installer/install-menu-perltk.pl @@ -557,10 +557,10 @@ sub menu_select_scheme { my $b; if ($i < $nrfh) { $b = $f2l->Radiobutton(-variable => \$selected, -value => $scheme, - -text => $tlpobj->shortdesc)->pack(-anchor => 'w'); + -text => __($tlpobj->shortdesc))->pack(-anchor => 'w'); } else { $b = $f2r->Radiobutton(-variable => \$selected, -value => $scheme, - -text => $tlpobj->shortdesc)->pack(-anchor => 'w'); + -text => __($tlpobj->shortdesc))->pack(-anchor => 'w'); } if ($selected eq $scheme) { $b->focus(); @@ -596,9 +596,9 @@ sub menu_select_standard_collections { foreach my $coll (sort @collections_std) { my $tlpobj = $tlpdb->get_package("$coll"); if ($i < $halfcol) { - $f1->Checkbutton(-variable => \$lvars{$coll}, -text => $tlpobj->shortdesc)->pack(-anchor => 'w'); + $f1->Checkbutton(-variable => \$lvars{$coll}, -text => __($tlpobj->shortdesc))->pack(-anchor => 'w'); } else { - $f2->Checkbutton(-variable => \$lvars{$coll}, -text => $tlpobj->shortdesc)->pack(-anchor => 'w'); + $f2->Checkbutton(-variable => \$lvars{$coll}, -text => __($tlpobj->shortdesc))->pack(-anchor => 'w'); } $i++; } @@ -639,9 +639,9 @@ sub menu_select_lang_collections { foreach my $coll (sort @collections_lang) { my $tlpobj = $tlpdb->get_package("$coll"); if ($i < $langh) { - $f1langLa->Checkbutton(-variable => \$lvars{$coll}, -text => $tlpobj->shortdesc)->pack(-anchor => 'w'); + $f1langLa->Checkbutton(-variable => \$lvars{$coll}, -text => __($tlpobj->shortdesc))->pack(-anchor => 'w'); } else { - $f1langLb->Checkbutton(-variable => \$lvars{$coll}, -text => $tlpobj->shortdesc)->pack(-anchor => 'w'); + $f1langLb->Checkbutton(-variable => \$lvars{$coll}, -text => __($tlpobj->shortdesc))->pack(-anchor => 'w'); } $i++; } @@ -661,9 +661,9 @@ sub menu_select_lang_collections { foreach my $coll (sort @collections_lang_doc) { my $tlpobj = $tlpdb->get_package("$coll"); if ($i < $doch) { - $f1docLa->Checkbutton(-variable => \$lvars{$coll}, -text => $tlpobj->shortdesc)->pack(-anchor => 'w'); + $f1docLa->Checkbutton(-variable => \$lvars{$coll}, -text => __($tlpobj->shortdesc))->pack(-anchor => 'w'); } else { - $f1docLb->Checkbutton(-variable => \$lvars{$coll}, -text => $tlpobj->shortdesc)->pack(-anchor => 'w'); + $f1docLb->Checkbutton(-variable => \$lvars{$coll}, -text => __($tlpobj->shortdesc))->pack(-anchor => 'w'); } $i++; } |