diff options
Diffstat (limited to 'dhcp_wizard/Dhcp.pm')
| -rwxr-xr-x | dhcp_wizard/Dhcp.pm | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/dhcp_wizard/Dhcp.pm b/dhcp_wizard/Dhcp.pm index b38ba025..3bb73ef1 100755 --- a/dhcp_wizard/Dhcp.pm +++ b/dhcp_wizard/Dhcp.pm @@ -2,8 +2,10 @@ # Drakwizard -# Copyright (C) 2002 Arnaud Desmons <adesmons@mandrakesoft.com> -# 2003 Florent Villard <warly@mandrakesoft.com> +# Copyright (C) 2002, 2003 Mandrakesoft +# +# Authors: Arnaud Desmons <adesmons@mandrakesoft.com> +# Florent Villard <warly@mandrakesoft.com> # # This program is free software; you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by @@ -37,7 +39,8 @@ my $o = { var => { ip1 => '', ip2 => '', - interface => $wiz->{net}->default_itf() + wiz_authoritative => 0, + einterface => $wiz->{net}->default_itf() }, needed_rpm => [ 'dhcp-server' ], defaultimage => "$ENV{__WIZ_HOME__}dhcp_wizard/images/DHCP.png" @@ -217,7 +220,7 @@ mask = $wiz_ip_netmask, rng1 = $wiz_ip_range1, rng2 = $wiz_ip_range2, dname = $w $mdk{interfaces} = $wiz_device; standalone::explanations("$file: lease_file = $mdk{lease_file}, interfaces = $mdk{interfaces}"); MDK::Wizard::Varspaceval->commit($file, \%mdk); - !$ENV{wiz_authoritative} and output($file, map { + !$o-{var}{wiz_authoritative} and output($file, map { s|^\s*not\s*authoritative.*|\#$&|i; $_ } cat_ ("/etc/dhcpd.conf")); |