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 2006-03-15 16:33:24.000000000 -0500 |
3 |
+++ mezzanine_patched_e-smith-domains-1.4.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/domains.pm 2007-10-16 16:45:33.000000000 -0400 |
4 |
@@ -310,8 +310,14 @@ |
5 |
($forwarder, $forwarder2) = ($forwarder2, '') |
6 |
if ($forwarder2 and not $forwarder); |
7 |
|
8 |
- $db->set_prop('dnscache', 'Forwarder', $forwarder); |
9 |
- $db->set_prop('dnscache', 'Forwarder2', $forwarder2); |
10 |
+ if ($forwarder) |
11 |
+ $db->set_prop('dnscache', 'Forwarder', $forwarder); |
12 |
+ else |
13 |
+ $db->delete_prop('dnscache', 'Forwarder'); |
14 |
+ if ($forwarder2) |
15 |
+ $db->set_prop('dnscache', 'Forwarder2', $forwarder2); |
16 |
+ else |
17 |
+ $db->delete_prop('dnscache', 'Forwarder2'); |
18 |
|
19 |
unless ( system( "/sbin/e-smith/signal-event", "dns-update" ) == 0 ) |
20 |
{ |