From 190fe68ba0d4cb9536bb53257697b0a2ce0f09f9 Mon Sep 17 00:00:00 2001
From: Yves Duret <yduret@mandriva.com>
Date: Tue, 4 Sep 2001 12:48:56 +0000
Subject: embedded mode fix

---
 perl-install/interactive_gtk.pm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'perl-install')

diff --git a/perl-install/interactive_gtk.pm b/perl-install/interactive_gtk.pm
index 41240ac46..6445b39b5 100644
--- a/perl-install/interactive_gtk.pm
+++ b/perl-install/interactive_gtk.pm
@@ -751,6 +751,7 @@ sub ask_browse_tree_info_refW {
 sub wait_messageW($$$) {
     my ($o, $title, $messages) = @_;
 
+    local $my_gtk::pop_it = 1;
     my $w = my_gtk->new($title, %$o, grab => 1);
     gtkadd($w->{window}, my $hbox = new Gtk::HBox(0,0));
     $hbox->pack_start(my $box = new Gtk::VBox(0,0), 1, 1, 10);  
-- 
cgit v1.2.1