diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-07-17 18:55:40 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-07-17 18:55:40 +0000 |
commit | 8d2bcb434da75988d804fef1f8fc593c7e738588 (patch) | |
tree | e79425faf2a87165669f99b52d4162919dee277e /perl-install | |
parent | c14152a26c29b5b169d0ebbd577d2ef09c8141da (diff) | |
download | drakx-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')
-rwxr-xr-x | perl-install/standalone/drakconnect | 12 |
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++; } |