diff options
| -rw-r--r-- | perl-install/install/NEWS | 1 | ||||
| -rw-r--r-- | perl-install/mygtk2.pm | 2 |
2 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 37b148d37..d3ed6d8bd 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,6 +1,7 @@ - center sub dialogs - prevent flickering by: o ignoring bogus size-allocate events + o properly computing window position - stop reducing help & release notes dialogs' size Version 11.17 - 19 August 2008 diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm index 5a24de514..abd308d54 100644 --- a/perl-install/mygtk2.pm +++ b/perl-install/mygtk2.pm @@ -992,7 +992,7 @@ sub _create_Window { $no_Window_Manager ? 'center-always' : 'center-on-parent', if_($::isInstall, position => [ - $::rootwidth + $::stepswidth - ($::o->{windowwidth} + $::real_windowwidth) / 2, + $::stepswidth + ($::o->{windowwidth} - $::real_windowwidth) / 2, ($::o->{windowheight} - $::real_windowheight) / 2, ]), }); |