summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.com>2007-09-28 20:31:47 +0000
committerOlivier Blin <oblin@mandriva.com>2007-09-28 20:31:47 +0000
commitd281dba36fb43e8ad129b6e82209c6c2531d4a00 (patch)
tree4fe04472280c0f1db44d0ee4ba21ceb001f69ddb /perl-install
parente83bc8375896def1a8bfecb6320dc7e33d955b4f (diff)
downloaddrakx-backup-do-not-use-d281dba36fb43e8ad129b6e82209c6c2531d4a00.tar
drakx-backup-do-not-use-d281dba36fb43e8ad129b6e82209c6c2531d4a00.tar.gz
drakx-backup-do-not-use-d281dba36fb43e8ad129b6e82209c6c2531d4a00.tar.bz2
drakx-backup-do-not-use-d281dba36fb43e8ad129b6e82209c6c2531d4a00.tar.xz
drakx-backup-do-not-use-d281dba36fb43e8ad129b6e82209c6c2531d4a00.zip
allow interactive::gtk frontends not to pop wait messages
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS1
-rw-r--r--perl-install/interactive/gtk.pm2
2 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index d9e9ce5f8..4b0fd244d 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,4 +1,5 @@
- allow interactive::gtk frontends to ask for a directory
+ - allow interactive::gtk frontends not to pop wait messages
Version 10.4.221 - 28 September 2007, by Olivier "blino" Blin
diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm
index 473e3a22a..2315556fd 100644
--- a/perl-install/interactive/gtk.pm
+++ b/perl-install/interactive/gtk.pm
@@ -838,7 +838,7 @@ sub wait_messageW {
my $Window = gtknew('MagicWindow',
title => $title,
- pop_it => !$::isInstall,
+ pop_it => defined $o->{pop_wait_messages} ? $o->{pop_wait_messages} : !$::isInstall,
modal => 1,
$::isInstall ? (banner => Gtk2::Banner->new((get_default_step_items())[0], $message)) : (),
no_Window_Manager => exists $o->{no_Window_Manager} ? $o->{no_Window_Manager} : !$::isStandalone,