Index: trunk/DNSDB/ExportBIND.pm
===================================================================
--- trunk/DNSDB/ExportBIND.pm	(revision 875)
+++ trunk/DNSDB/ExportBIND.pm	(revision 876)
@@ -526,5 +526,5 @@
 #    ($host,$val) = __revswap($host,$val) if $revrec eq 'y';
 #    print {$zonefiles->{$loc}} "$host  $ttl    IN      SRV     $distance   $weight $port   $val\n" or die $!;
-    my $recdata = "$host	$ttl	IN	SRV	$distance	$weight $port	$val\n";
+    my $recdata = "$host	$ttl	IN	SRV	$distance	$weight $port	$val.\n";
     recprint($zonefiles, $loclist, $loc, $recdata);
   } # SRV
@@ -533,5 +533,5 @@
 #    ($host,$val) = __revswap($host,$val) if $revrec eq 'y';
 #    print {$zonefiles->{$loc}} "$host  $ttl    IN      RP      $val\n" or die $!;
-    my $recdata = "$host	$ttl	IN	RP	$val\n";
+    my $recdata = "$host.	$ttl	IN	RP	$val\n";
     recprint($zonefiles, $loclist, $loc, $recdata);
   } # RP
@@ -576,5 +576,5 @@
       # fingers and close our eyes and make it Someone Else's Problem.
 #      print {$zonefiles->{$loc}} "$host	$ttl	IN	PTR	$val\n" or die $!;
-      my $recdata = "$host	$ttl	IN	PTR	$val\n";
+      my $recdata = "$host.	$ttl	IN	PTR	$val.\n";
       recprint($zonefiles, $loclist, $loc, $recdata);
     }