summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2003-07-17 18:55:40 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2003-07-17 18:55:40 +0000
commit8d2bcb434da75988d804fef1f8fc593c7e738588 (patch)
treee79425faf2a87165669f99b52d4162919dee277e /perl-install/standalone
parentc14152a26c29b5b169d0ebbd577d2ef09c8141da (diff)
downloaddrakx-backup-do-not-use-8d2bcb434da75988d804fef1f8fc593c7e738588.tar
drakx-backup-do-not-use-8d2bcb434da75988d804fef1f8fc593c7e738588.tar.gz
drakx-backup-do-not-use-8d2bcb434da75988d804fef1f8fc593c7e738588.tar.bz2
drakx-backup-do-not-use-8d2bcb434da75988d804fef1f8fc593c7e738588.tar.xz
drakx-backup-do-not-use-8d2bcb434da75988d804fef1f8fc593c7e738588.zip
correctly align fields in "lan configuration" dialog
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/drakconnect12
1 files changed, 8 insertions, 4 deletions
diff --git a/perl-install/standalone/drakconnect b/perl-install/standalone/drakconnect
index a8e44f50a..7aa2f7579 100755
--- a/perl-install/standalone/drakconnect
+++ b/perl-install/standalone/drakconnect
@@ -412,21 +412,25 @@ Configure them first by clicking on 'Configure'")),1,1,0);
[N("DHCP client"), \$netcnx->{dhcp_client}]
);
my $i = 0;
+ my $size_group = Gtk2::SizeGroup->new('horizontal');
+
foreach my $j (@conf_data) {
my $l = new Gtk2::Label($j->[0]);
$l->set_justify('left');
$infos[2*$i] = gtkpack_(Gtk2::HBox->new,
- 1);
- $vbox_local->pack_start($infos[2*$i],0,0,0);
+ 1, $l);
+ $vbox_local->pack_start($infos[2*$i], 1, 1, 0);
+ my $c;
if (defined $j->[2]) {
- my $c = new Gtk2::OptionMenu;
+ $c = new Gtk2::OptionMenu;
$c->set_popdown_strings(@{$j->[2]});
$infos[2*$i+1] = $c->entry;
$infos[2*$i]->pack_start($c,0,0,0);
} else {
- $infos[2*$i+1] = new Gtk2::Entry();
+ $infos[2*$i+1] = ($c = Gtk2::Entry->new);
$infos[2*$i]->pack_start($infos[2*$i+1],0,0,0);
}
+ $size_group->add_widget($c);
$infos[2*$i+1]->set_text(${$j->[1]});
$i++;
}