diff options
author | Norbert Preining <preining@logic.at> | 2011-06-08 00:41:15 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2011-06-08 00:41:15 +0000 |
commit | 101fd69e95e2e7903a2342a2dfeaef59816676cc (patch) | |
tree | 6fc696382f616e820f7d5cfae16ec3111304b442 /Master/tlpkg/installer | |
parent | ec4ce05182cd69af8ab30b1da0cc46061a45efca (diff) |
gui installer: if only one arch is selected, show the arch name instead
of 1 out of NN (suggestions by Mojca)
git-svn-id: svn://tug.org/texlive/trunk@22858 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, 15 insertions, 1 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl index 0eb042d9607..b79ad124447 100644 --- a/Master/tlpkg/installer/install-menu-perltk.pl +++ b/Master/tlpkg/installer/install-menu-perltk.pl @@ -865,7 +865,21 @@ sub menu_set_schemebutton_text { sub menu_set_binbutton_text { if (!win32()) { - menu_set_text($bintextbutton, __("%s out of %s", $vars{'n_systems_selected'}, $vars{'n_systems_available'})); + if ($vars{'n_systems_selected'} == 1) { + my $selsys; + foreach my $key (keys %vars) { + if ($key=~/binary_(.*)/) { + if ($vars{$key}) { + $selsys = $1; + # we have only one system selected, stop here + last; + } + } + } + menu_set_text($bintextbutton, $selsys); + } else { + menu_set_text($bintextbutton, __("%s out of %s", $vars{'n_systems_selected'}, $vars{'n_systems_available'})); + } } } |