diff options
author | Antoine Ginies <aginies@mandriva.com> | 2004-08-12 07:50:14 +0000 |
---|---|---|
committer | Antoine Ginies <aginies@mandriva.com> | 2004-08-12 07:50:14 +0000 |
commit | cb5fa5c9792b42eb5fc1b3a7836454bec10322cd (patch) | |
tree | cfe9c7219ed5933f93452836e2b469ff475a5ad2 /drakpxelinux.pl | |
parent | b4a2b25775faec158f0973919d92d7e8a18eb13a (diff) | |
download | drakpxelinux-cb5fa5c9792b42eb5fc1b3a7836454bec10322cd.tar drakpxelinux-cb5fa5c9792b42eb5fc1b3a7836454bec10322cd.tar.gz drakpxelinux-cb5fa5c9792b42eb5fc1b3a7836454bec10322cd.tar.bz2 drakpxelinux-cb5fa5c9792b42eb5fc1b3a7836454bec10322cd.tar.xz drakpxelinux-cb5fa5c9792b42eb5fc1b3a7836454bec10322cd.zip |
add a check box for DHCP or ip address
Diffstat (limited to 'drakpxelinux.pl')
-rw-r--r-- | drakpxelinux.pl | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/drakpxelinux.pl b/drakpxelinux.pl index 85af02c..bf26980 100644 --- a/drakpxelinux.pl +++ b/drakpxelinux.pl @@ -566,6 +566,19 @@ sub edit_box_item { ); }; + my $ipaddr = Gtk2::Entry->new; + $ipaddr->set_sensitive(0); + my $toggledhcp = Gtk2::CheckButton->new(N("DHCP")); + $toggledhcp->set_active(1); + $toggledhcp->signal_connect(clicked => sub { + my $s = $toggledhcp->get_active; + if ($s eq "1") { + $ipaddr->set_sensitive(0); + } else { + $ipaddr->set_sensitive(1); + } + }); + # ok, lets create the dialog box :-) gtkpack_($dialog->vbox, 0, gtkadd(Gtk2::Frame->new(N("PXE entry")), @@ -589,7 +602,8 @@ sub edit_box_item { gtkpack_(gtkset_border_width(Gtk2::VBox->new, 3), 0, $label_and_widgets->(N("Installation method"), $automatic, ""), 0, $label_and_widgets->(N("Network Interface"), $interface, ""), - 0, $label_and_widgets->(N("IP address"), $network, ""), + 0, $toggledhcp, + 0, $ipaddr, 0, $label_and_widgets->(N("Remote Server name"), $server, ""), 0, $label_and_widgets->(N("Remote installation Directory"), $directory, ""), ), |