(NewWindow) make subwindows transcient to the main one

1 files changed, 1 insertions, 0 deletions

diff --git a/userdrake b/userdrake
index 309c76c..9876470 100755
--- a/userdrake
+++ b/userdrake
@@ -684,6 +684,7 @@ sub NewWindow {
     my ($title) = @_;
     my $w = gtkset_border_width(Gtk2::Window->new('toplevel'), 5);
     $w->set_title($title);
+    $w->set_transient_for($us->{wnd}{real_window});
     $w->signal_connect(delete_event => sub { $w->destroy });
     $w->set_position('center');
     $w->set_modal(1);