summaryrefslogtreecommitdiffstats
path: root/perl-install/mygtk2.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-08-19 14:46:34 +0000
committerThierry Vignaud <tv@mandriva.org>2008-08-19 14:46:34 +0000
commit1018bda7b5048ea2e8da8efaf15b27abedcb3b2d (patch)
tree43048e7099af11e9bb2d732223082bd0b62a5f7d /perl-install/mygtk2.pm
parentf12dedeffc187e863999f266e7895ba316fcc816 (diff)
downloaddrakx-1018bda7b5048ea2e8da8efaf15b27abedcb3b2d.tar
drakx-1018bda7b5048ea2e8da8efaf15b27abedcb3b2d.tar.gz
drakx-1018bda7b5048ea2e8da8efaf15b27abedcb3b2d.tar.bz2
drakx-1018bda7b5048ea2e8da8efaf15b27abedcb3b2d.tar.xz
drakx-1018bda7b5048ea2e8da8efaf15b27abedcb3b2d.zip
(_create_Window) center sub dialogs
Diffstat (limited to 'perl-install/mygtk2.pm')
-rw-r--r--perl-install/mygtk2.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm
index 722952025..53e8bbb22 100644
--- a/perl-install/mygtk2.pm
+++ b/perl-install/mygtk2.pm
@@ -987,7 +987,9 @@ sub _create_Window {
if_(!$::isInstall && !$::isWizard, border_width => 5),
#- policy: during install, we need a special code to handle the weird centering, see below
- position_policy => $::isInstall ? 'none' : $no_Window_Manager ? 'center-always' : 'center-on-parent',
+ position_policy => $::isInstall ?
+ ($opts->{transient_for} ? 'center-always' : 'none') :
+ $no_Window_Manager ? 'center-always' : 'center-on-parent',
if_($::isInstall, position => [
$::rootwidth + $::stepswidth - ($::o->{windowwidth} + $::real_windowwidth) / 2,