From 8eda95cfd17ba78c28e2e818b36a5ac8c26b1c1c Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 22 Jan 2005 20:04:52 +0000 Subject: fix the various transient on {rwindow} (or even {window} ?) not working anymore on the MagicWindow (maybe the code could be simplified since it should now work even when embedded (?)) --- perl-install/diskdrake/hd_gtk.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/diskdrake') diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm index a4ce1be77..036bfff85 100644 --- a/perl-install/diskdrake/hd_gtk.pm +++ b/perl-install/diskdrake/hd_gtk.pm @@ -53,7 +53,7 @@ sub main { local $in->{grab} = 1; $w = ugtk2->new('DiskDrake'); - $::main_window = $w->{rwindow} if !$::isEmbedded && !$::isInstall; + $::main_window = $w->{real_window} if !$::isEmbedded && !$::isInstall; my $rc = "/usr/share/libDrakX/diskdrake.rc"; -r $rc or $rc = dirname(__FILE__) . "/../diskdrake.rc"; -r $rc or $rc = dirname(__FILE__) . "/../share/diskdrake.rc"; -- cgit v1.2.1