X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=bin%2Fbind.export;h=286e43a2dcb2625bd1eb0339d09b7cfc9cf724d8;hp=d0b93797ec3f7f2ee1f2c1c0ae325849d75127cb;hb=38852d0e11e617f5f531e5edf6b4eb922a06107f;hpb=2041a9143fac20b79ead4a1ae01224dedf5b27c2 diff --git a/bin/bind.export b/bin/bind.export index d0b93797e..286e43a2d 100755 --- a/bin/bind.export +++ b/bin/bind.export @@ -43,10 +43,12 @@ foreach my $export ( @exports ) { open(NAMED_CONF,">$prefix/named.conf") or die "can't open $prefix/named.conf: $!"; - open(CONF_HEADER,"<$prefix/named.conf.HEADER") - or die "can't open $prefix/named.conf.HEADER: $!"; - while () { print NAMED_CONF $_; } - close CONF_HEADER; + if ( -e "$prefix/named.conf.HEADER" ) { + open(CONF_HEADER,"<$prefix/named.conf.HEADER") + or die "can't open $prefix/named.conf.HEADER: $!"; + while () { print NAMED_CONF $_; } + close CONF_HEADER; + } my $zonepath = $export->option('zonepath'); $zonepath =~ s/\/$//; @@ -145,10 +147,12 @@ foreach my $sexport ( @sexports ) { #false laziness with above open(NAMED_CONF,">$prefix/named.conf") or die "can't open $prefix/named.conf: $!"; - open(CONF_HEADER,"<$prefix/named.conf.HEADER") - or die "can't open $prefix/named.conf.HEADER: $!"; - while () { print NAMED_CONF $_; } - close CONF_HEADER; + if ( -e "$prefix/named.conf.HEADER" ) { + open(CONF_HEADER,"<$prefix/named.conf.HEADER") + or die "can't open $prefix/named.conf.HEADER: $!"; + while () { print NAMED_CONF $_; } + close CONF_HEADER; + } my $masters = $sexport->option('master');