e-smith-domains/sme7/e-smith-domains-1.4.0-delete_forwarder.patch2

diff -Nur -x '*.orig' -x '*.rej' e-smith-domains-1.4.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/domains.pm mezzanine_patched_e-smith-domains-1.4.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/domains.pm
--- e-smith-domains-1.4.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/domains.pm       2007-10-20 10:16:12.000000000 -0400
+++ mezzanine_patched_e-smith-domains-1.4.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/domains.pm     2007-10-20 10:15:56.000000000 -0400
@@ -311,13 +311,21 @@
         if ($forwarder2 and not $forwarder);
 
     if ($forwarder)
+    {
        $db->set_prop('dnscache', 'Forwarder', $forwarder);
+    }
     else
+    {
        $db->delete_prop('dnscache', 'Forwarder');
+    }
     if ($forwarder2)
+    {
        $db->set_prop('dnscache', 'Forwarder2', $forwarder2);
+    }
     else
+    {
        $db->delete_prop('dnscache', 'Forwarder2');
+    }
 
     unless ( system( "/sbin/e-smith/signal-event", "dns-update" ) == 0 )
     {
1	diff -Nur -x '.orig' -x '.rej' e-smith-domains-1.4.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/domains.pm mezzanine_patched_e-smith-domains-1.4.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/domains.pm
2	--- e-smith-domains-1.4.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/domains.pm 2007-10-20 10:16:12.000000000 -0400
3	+++ mezzanine_patched_e-smith-domains-1.4.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/domains.pm 2007-10-20 10:15:56.000000000 -0400
4	@@ -311,13 +311,21 @@
5	if ($forwarder2 and not $forwarder);
6
7	if ($forwarder)
8	+ {
9	$db->set_prop('dnscache', 'Forwarder', $forwarder);
10	+ }
11	else
12	+ {
13	$db->delete_prop('dnscache', 'Forwarder');
14	+ }
15	if ($forwarder2)
16	+ {
17	$db->set_prop('dnscache', 'Forwarder2', $forwarder2);
18	+ }
19	else
20	+ {
21	$db->delete_prop('dnscache', 'Forwarder2');
22	+ }
23
24	unless ( system( "/sbin/e-smith/signal-event", "dns-update" ) == 0 )
25	{