From b5877fc0a51456d5afb08e5c04a04ce82b20c6cf Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Mon, 27 Jan 2003 09:19:38 +0000 Subject: make interactive help window be modal, aka transcient for main ugtk2 window --- perl-install/standalone/harddrake2 | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install/standalone') diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index d2617e6fb..7411d14ae 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -119,6 +119,7 @@ gtkflush(); # Build the gui add_icon_path('/usr/share/pixmaps/harddrake2/'); $w = ugtk2->new(N("Harddrake2 version ") . $harddrake::data::version); +$::main_window = $w->{rwindow} unless $::isEmbedded; my ($menubar, $factory); unless ($::isEmbedded) { $w->{window}->set_size_request(805, 550); -- cgit v1.2.1