From 2005ff75acb8a5d500339be541ae58f5e5b912cb Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sun, 21 Apr 2013 00:00:50 +0000 Subject: enable rpmdrake to not use modal dialogs (mga#9646) --- gurpm/RPMProgressDialog.pm | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) (limited to 'gurpm') diff --git a/gurpm/RPMProgressDialog.pm b/gurpm/RPMProgressDialog.pm index d9fd8cc7..f4748f5a 100644 --- a/gurpm/RPMProgressDialog.pm +++ b/gurpm/RPMProgressDialog.pm @@ -68,7 +68,7 @@ Arguments are an urpm object and a quit routine reference. sub new { - my ($self, $global_urpm, $o_quit) = @_; + my ($self, $global_urpm, $o_quit, $o_no_modal) = @_; # my $w = ugtk2->new($title, %options, default_width => 600, width => 600); my $w = $mainw = bless(Gtk2::Window->new('toplevel'), $self); @@ -79,8 +79,11 @@ sub new { $w->signal_connect(destroy => $o_quit) if $o_quit; $w->set_position('center'); $w->set_default_size($progressbar_size, 60); - $w->set_type_hint('dialog'); # for matchbox window manager during install - $w->set_modal(1); # for matchbox window manager during install + # for matchbox window manager during install: + if (!$o_no_modal) { + $w->set_type_hint('dialog'); + $w->set_modal(1); + } $w->{mainbox} = Gtk2::VBox->new(0, 5); $w->add($w->{mainbox}); $urpm = $global_urpm; -- cgit v1.2.1