summaryrefslogtreecommitdiffstats
path: root/perl-install/mygtk2.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-08-21 17:00:11 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-08-21 17:00:11 +0000
commiteb696ca9c5642a722f892d88c261b46d97fbc07c (patch)
tree335ac0d31c718d87a7d0d49b17fd948532c4a31d /perl-install/mygtk2.pm
parent838ab8898a7aba05891ba8e421712ffe0c6d1c79 (diff)
downloaddrakx-eb696ca9c5642a722f892d88c261b46d97fbc07c.tar
drakx-eb696ca9c5642a722f892d88c261b46d97fbc07c.tar.gz
drakx-eb696ca9c5642a722f892d88c261b46d97fbc07c.tar.bz2
drakx-eb696ca9c5642a722f892d88c261b46d97fbc07c.tar.xz
drakx-eb696ca9c5642a722f892d88c261b46d97fbc07c.zip
remove 2 hacks:
- it seems the ->show is unneeded - and then the special case for 200x200 window is no more needed
Diffstat (limited to 'perl-install/mygtk2.pm')
-rw-r--r--perl-install/mygtk2.pm3
1 files changed, 0 insertions, 3 deletions
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index fbc74a82e..657e89d49 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -1033,13 +1033,10 @@ sub _create_Window {
return if $w_size[2] < 5;
return if $w_size[2] == $wi && $w_size[3] == $he; #BUG
(undef, undef, $wi, $he) = @w_size;
- return if $wi <= 200 && $he <= 200;
$w->move(max(0, $::rootwidth - ($::o->{windowwidth} + $wi) / 2),
max(0, ($::o->{windowheight} - $he) / 2));
});
- #- without this, the focus is broken during install, though this is not needed during X test, why??
- $w->show;
}
$w;