From e3e736512894424f2e9b27296d47c8d7ba2ea2ad Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Thu, 15 Jul 2004 08:16:34 +0000 Subject: add a border spacing of 5 pixel (fix #10299, from Fabrice Facorat) --- perl-install/standalone/net_monitor | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'perl-install/standalone/net_monitor') diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor index 67d267010..802fd4d89 100755 --- a/perl-install/standalone/net_monitor +++ b/perl-install/standalone/net_monitor @@ -91,19 +91,19 @@ gtkadd($window1->{window}, 1, my $notebook = Gtk2::Notebook->new, 0, gtkpack_(Gtk2::VBox->new(0,5), 0, gtkadd(gtkset_shadow_type(Gtk2::Frame->new(N("Settings")), 'etched_out'), - gtkpack__(Gtk2::HBox->new(0,0), + gtkpack__(gtkset_border_width(Gtk2::HBox->new(0,0),5), N("Connection type: "), my $label_cnx_type = Gtk2::Label->new("")), ), 1, gtkadd(gtkset_shadow_type(Gtk2::Frame->new(N("Global statistics")), 'etched_out'), - gtkpack__(Gtk2::VBox->new(0,0), + gtkpack__(gtkset_border_width(Gtk2::VBox->new(0,0),5), create_packtable({ col_spacings => 1, row_spacings => 1 }, [ "", N("Instantaneous") , N("Average") ], [ Gtk2::WrappedLabel->new(N("Sending\nspeed:")), my $label_st = Gtk2::Label->new(""), my $label_sta = Gtk2::Label->new("na") ], [ Gtk2::WrappedLabel->new(N("Receiving\nspeed:")), my $label_sr = Gtk2::Label->new(""), my $label_sra = Gtk2::Label->new("na") ], ), - gtkpack__(Gtk2::HBox->new(0,0), + gtkpack__(gtkset_border_width(Gtk2::HBox->new(0,0),5), N("Connection\ntime: "), my $label_ct = Gtk2::Label->new(""), ), -- cgit v1.2.1