diff options
author | Stephen Hemminger <stephen.hemminger@vyatta.com> | 2008-11-21 17:05:44 -0800 |
---|---|---|
committer | Stephen Hemminger <stephen.hemminger@vyatta.com> | 2008-11-21 17:05:44 -0800 |
commit | 62af8baf3a696f774430117927440c114248a81d (patch) | |
tree | 77956280017b2dff1c06e29d9c04b096f68bc552 /scripts/dns-forwarding | |
parent | 5021e2073b50f3f2022d19c07870b11604548689 (diff) | |
download | vyatta-cfg-quagga-62af8baf3a696f774430117927440c114248a81d.tar.gz vyatta-cfg-quagga-62af8baf3a696f774430117927440c114248a81d.zip |
Convert to Vyatta::Config hierarchy
Diffstat (limited to 'scripts/dns-forwarding')
-rw-r--r-- | scripts/dns-forwarding/vyatta-dns-forwarding.pl | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/scripts/dns-forwarding/vyatta-dns-forwarding.pl b/scripts/dns-forwarding/vyatta-dns-forwarding.pl index d0d7e36c..8c28becd 100644 --- a/scripts/dns-forwarding/vyatta-dns-forwarding.pl +++ b/scripts/dns-forwarding/vyatta-dns-forwarding.pl @@ -24,8 +24,8 @@ # use lib "/opt/vyatta/share/perl5/"; -use VyattaConfig; -use VyattaMisc; +use Vyatta::Config; +use Vyatta::Misc; use Getopt::Long; use strict; @@ -60,7 +60,7 @@ sub dnsforwarding_get_values { my $outside_cli = shift; my $output = ''; - my $config = new VyattaConfig; + my $config = new Vyatta::Config; my $use_dnsmasq_conf = 0; my (@listen_interfaces, $cache_size, @use_nameservers, $use_system_nameservers, @use_dhcp_nameservers); @@ -101,7 +101,7 @@ sub dnsforwarding_get_values { if (defined($use_system_nameservers)) { $use_dnsmasq_conf = 1; - my $sys_config = new VyattaConfig; + my $sys_config = new Vyatta::Config; $sys_config->setLevel("system"); my @system_nameservers; if ($outside_cli == 1){ @@ -156,7 +156,7 @@ sub check_nameserver { sub check_system_nameserver { - my $config = new VyattaConfig; + my $config = new Vyatta::Config; $config->setLevel("system"); my @system_nameservers = $config->returnValues("name-server"); return(@system_nameservers); @@ -165,7 +165,7 @@ sub check_system_nameserver { sub check_dhcp_any_interface { - my $config = new VyattaConfig; + my $config = new Vyatta::Config; $config->setLevel("interfaces ethernet"); my @eths = $config->listNodes("."); foreach my $eth (@eths) { @@ -207,7 +207,7 @@ sub check_dhcp_any_interface { sub is_dhcp_enabled { my $intf = shift; - my $config = new VyattaConfig; + my $config = new Vyatta::Config; if ($intf =~ m/^eth/) { if ($intf =~ m/(\w+)\.(\d+)/) { @@ -278,7 +278,7 @@ if (defined $dhcp_interface) { if (defined $update_dnsforwarding) { my $config; - my $vyatta_config = new VyattaConfig; + my $vyatta_config = new Vyatta::Config; $vyatta_config->setLevel("service dns forwarding"); my $use_system_nameservers = $vyatta_config->exists("system"); |