summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-12-13 15:21:35 +0000
committerThierry Vignaud <tv@mageia.org>2012-12-13 15:21:35 +0000
commit7e9fd5a2028da2b964d000e6066529583ec16c67 (patch)
treed5835ef37f0189529f15eb7344a37278bd781732 /perl-install/diskdrake
parentb81aa6049d4a578a8a9d18919b4df26733a33857 (diff)
downloaddrakx-7e9fd5a2028da2b964d000e6066529583ec16c67.tar
drakx-7e9fd5a2028da2b964d000e6066529583ec16c67.tar.gz
drakx-7e9fd5a2028da2b964d000e6066529583ec16c67.tar.bz2
drakx-7e9fd5a2028da2b964d000e6066529583ec16c67.tar.xz
drakx-7e9fd5a2028da2b964d000e6066529583ec16c67.zip
use mygtk2::register_main_window()
Diffstat (limited to 'perl-install/diskdrake')
-rw-r--r--perl-install/diskdrake/hd_gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index 2ceb5ac40..8fa6ad83a 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -59,7 +59,7 @@ sub main {
local $in->{grab} = 1;
$w = ugtk2->new(N("Partitioning"));
- $::main_window = $w->{real_window} if !$::isEmbedded && !$::isInstall;
+ mygtk2::register_main_window($w->{real_window}) if !$::isEmbedded && !$::isInstall;
load_theme();