From 653e0ee12f7770163bba6c2ed6b00b9631688056 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 24 Nov 2006 11:51:40 +0000 Subject: (interactive_packtable) make sub dialogs modal to current sub dialog, not to parent's parent window --- rpmdrake.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'rpmdrake.pm') diff --git a/rpmdrake.pm b/rpmdrake.pm index 97a04f70..d4a0bc57 100644 --- a/rpmdrake.pm +++ b/rpmdrake.pm @@ -240,6 +240,7 @@ sub interactive_packtable { my ($title, $parent_window, $top_label, $lines, $action_buttons) = @_; my $w = ugtk2->new($title, grab => 1, transient => $parent_window); + local $::main_window = $w->{real_window}; $w->{rwindow}->set_position($parent_window ? 'center_on_parent' : 'center'); my $packtable = create_packtable({}, @$lines); -- cgit v1.2.1