From 70c79d64b40d992cc18ed971d939c9c78eb0543c Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Thu, 11 Sep 2008 15:07:22 +0000 Subject: (_gtk_any_Box) fix default spacing between GUI elements --- perl-install/NEWS | 1 + perl-install/install/NEWS | 1 + perl-install/mygtk2.pm | 2 +- 3 files changed, 3 insertions(+), 1 deletion(-) diff --git a/perl-install/NEWS b/perl-install/NEWS index 37852125a..efa8a56aa 100644 --- a/perl-install/NEWS +++ b/perl-install/NEWS @@ -1,3 +1,4 @@ +- fix default spacing between GUI elements - finish-install: o fix setting utf8 when using lang=xx from /proc/cmdline (#43566) - services (thanks to spuk): diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS index 22dde0009..e746cd16c 100644 --- a/perl-install/install/NEWS +++ b/perl-install/install/NEWS @@ -1,4 +1,5 @@ - do not render "Advanced" & "Help" buttons as blue +- fix default spacing between GUI elements - services (thanks to spuk): o list ip6tables in "Internet" category o list nfs-common and nfs-server in "File sharing" category diff --git a/perl-install/mygtk2.pm b/perl-install/mygtk2.pm index 44dd1092a..51324158e 100644 --- a/perl-install/mygtk2.pm +++ b/perl-install/mygtk2.pm @@ -879,7 +879,7 @@ sub _gtk_any_Box { my ($w, $opts, $class, $action) = @_; if (!$w) { - $w = "Gtk2::$class"->new(0,0); + $w = "Gtk2::$class"->new; $w->set_homogeneous(delete $opts->{homogenous}) if exists $opts->{homogenous}; $w->set_spacing(delete $opts->{spacing}) if exists $opts->{spacing}; $w->set_border_width(delete $opts->{border_width}) if exists $opts->{border_width}; -- cgit v1.2.1