summaryrefslogtreecommitdiff
path: root/Master/tlpkg/installer/install-menu-perltk.pl
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-11-18 13:13:07 +0000
committerNorbert Preining <preining@logic.at>2008-11-18 13:13:07 +0000
commit2523a20523776748a38cdee5bfa644b88671845b (patch)
treee941f1df2347a437e53700eaeefa00f31625d17e /Master/tlpkg/installer/install-menu-perltk.pl
parentd4ebde0fa73a0d14546853e2c113dee89b9afc07 (diff)
add a warn_hook and echo to GUI message window the tlwarn messages at install time
git-svn-id: svn://tug.org/texlive/trunk@11346 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer/install-menu-perltk.pl')
-rw-r--r--Master/tlpkg/installer/install-menu-perltk.pl5
1 files changed, 5 insertions, 0 deletions
diff --git a/Master/tlpkg/installer/install-menu-perltk.pl b/Master/tlpkg/installer/install-menu-perltk.pl
index 1cfd987f9ee..1f0f68a5e8e 100644
--- a/Master/tlpkg/installer/install-menu-perltk.pl
+++ b/Master/tlpkg/installer/install-menu-perltk.pl
@@ -108,6 +108,11 @@ push @::info_hook,
update_status(join(" ",@_));
$mainwindow->update;
};
+push @::warn_hook,
+ sub {
+ update_status(join(" ",@_));
+ $mainwindow->update;
+ };
push @::install_packages_hook, \&update_progressbar;
push @::install_packages_hook,
sub { $mainwindow->update; $::sww->update; };