summaryrefslogtreecommitdiff
path: root/Master
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-06-02 05:32:08 +0000
committerNorbert Preining <preining@logic.at>2008-06-02 05:32:08 +0000
commit244180f23a40e75286a184f896e596fe73da513b (patch)
tree633a22f55a40b4c6c84a5009abcc97a1421afe6c /Master
parentf40b05fbe631725bc3ab5cb930940b102674d3e6 (diff)
tlmgrgui.pl: if loading Tk fails, tell me what happened
git-svn-id: svn://tug.org/texlive/trunk@8463 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
-rwxr-xr-xMaster/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl7
1 files changed, 4 insertions, 3 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl
index 0c6cfe77580..1f425619ae4 100755
--- a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl
+++ b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui.pl
@@ -99,13 +99,14 @@ eval { require Tk; };
if ($@) {
# that didn't work out, give some usefull error message and stop
if (win32()) {
- printf STDERR _"Cannot load Tk, that should not happen as we ship it!
-How did you start tlmgrgui??\n";
+ printf STDERR "Cannot load Tk, that should not happen as we ship it!
+How did you start tlmgrgui??\n(Error message: $@)\n";
} else {
- printf STDERR _"
+ printf STDERR "
Cannot load Tk, thus the GUI cannot be started!
The Perl/Tk module is not shipped with the TeX Live installation.
You have to install it to get tlmgr GUI running.
+(Error message: $@)
";
}
exit 1;