summaryrefslogtreecommitdiff
path: root/Master/tlpkg/installer
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-08-03 23:36:17 +0000
committerNorbert Preining <preining@logic.at>2008-08-03 23:36:17 +0000
commitce8d04911b8063466e70e222bcf6e334b3c4211d (patch)
tree8e417e4e131ac954c8504f70747661b138e0ed3d /Master/tlpkg/installer
parentb8dd0380e8bd00004921bb030db83ac6361562b0 (diff)
gui installer: give more sensible warning if there is no translation
git-svn-id: svn://tug.org/texlive/trunk@10051 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer')
-rw-r--r--Master/tlpkg/installer/install-menu-perltk.pl7
1 files changed, 3 insertions, 4 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl
index 3bed35adc75..8ee5af9baaa 100644
--- a/Master/tlpkg/installer/install-menu-perltk.pl
+++ b/Master/tlpkg/installer/install-menu-perltk.pl
@@ -174,10 +174,9 @@ my %labels = ( binsys => 'Binary System(s)',
if (($::lang ne "en") && ($::lang ne "C")) {
if (! -r "$::installerdir/tlpkg/installer/lang/perltk-$::lang") {
- #eval { require("installer/lang/perltk-$::lang.pl"); };
- #if ($@) {
- # couldn't find the file, continue with english
- warn "Couldn't find language file installer/lang/perltk-$::lang.pl: $!\nContinuing in English!\n";
+ tlwarn ("\n Sorry, no translations available for $::lang; falling back to English.
+ (If you'd like to help translate the installer's messages, please see
+ http://tug.org/texlive/doc.html for information.)\n\n");
} else {
# merge the translated strings into the text string
open(LANG,"<$::installerdir/tlpkg/installer/lang/perltk-$::lang");