X-Git-Url: https://the.earth.li/gitweb/?a=blobdiff_plain;f=autodns.pl;h=4ddd2af4bf98ce30dbd8f2f723c3b31979e03881;hb=0f0b714329f21d32e30c0e4856602181f4b70d64;hp=afc6c5bb8d732488430b63fba646e4a985fc57ea;hpb=31b363d4355c1a7017d683c64dc271d76b4e14d4;p=autodns.git diff --git a/autodns.pl b/autodns.pl index afc6c5b..4ddd2af 100755 --- a/autodns.pl +++ b/autodns.pl @@ -5,7 +5,7 @@ # http://www.earth.li/projectpurple/progs/autodns.html # Released under the GPL. # -# $Id: autodns.pl,v 1.2 2003/06/04 17:27:00 noodles Exp $ +# $Id: autodns.pl,v 1.3 2004/04/08 10:45:44 noodles Exp $ # use strict; @@ -316,6 +316,9 @@ foreach (@COMMANDS) { print REPLY "Adding domain $domain\n"; $zones{$domain}=1; + my $df = $domain; + $df =~ tr,/,:,; + open (DOMAINSFILE, ">>$conffile"); print DOMAINSFILE " ### Domain added for '$user' @@ -323,7 +326,7 @@ foreach (@COMMANDS) { zone \"$domain\" { type slave; masters { $server; }; - file \"secondary/$user/$domain\"; + file \"secondary/$user/$df\"; allow-transfer { none; }; allow-query { any; }; };\n";