From 9618df67eba4281ff5c1aab68d95a553137ba1bf Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Tue, 19 Aug 2008 14:53:25 +0000 Subject: (ask_fromW,display_release_notes) stop reducing help & release notes dialogs' size --- perl-install/any.pm | 2 -- perl-install/install/NEWS | 1 + perl-install/interactive/gtk.pm | 2 -- 3 files changed, 1 insertion(+), 4 deletions(-) (limited to 'perl-install') diff --git a/perl-install/any.pm b/perl-install/any.pm index 76011c0b7..00642d97d 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -880,8 +880,6 @@ sub display_release_notes { ), ), ); - # make parent visible still visible: - local ($::real_windowwidth, $::real_windowheight) = ($::real_windowwidth - 50, $::real_windowheight - 50) if $::isInstall; mygtk2::set_main_window_size($w->{rwindow}); $w->{real_window}->grab_focus; $w->{real_window}->show_all; diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 88dd19bdd..04bf42ab9 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,4 +1,5 @@ - center sub dialogs +- stop reducing help & release notes dialogs' size Version 11.17 - 19 August 2008 diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm index 5a05874b8..092a853a2 100644 --- a/perl-install/interactive/gtk.pm +++ b/perl-install/interactive/gtk.pm @@ -769,8 +769,6 @@ sub ask_fromW { ), ), ); - # make parent visible still visible: - local ($::real_windowwidth, $::real_windowheight) = ($::real_windowwidth - 50, $::real_windowheight - 50); mygtk2::set_main_window_size($w->{rwindow}); $w->{real_window}->grab_focus; $w->{real_window}->show_all; -- cgit v1.2.1