Index: branches/stable/textrecs.cgi
===================================================================
--- branches/stable/textrecs.cgi	(revision 535)
+++ branches/stable/textrecs.cgi	(revision 546)
@@ -88,6 +88,6 @@
 foreach my $rec (@$reclist) {
   $rec->{type} = $typemap{$rec->{type}};
-  $rec->{val} .= '.' if $rec->{type} ne 'A' && $rec->{type} ne 'TXT' && $rec->{val} !~ /\.$/;
-  $rec->{host} .= '.' if $rec->{val} !~ /\.$/;
+  $rec->{val} .= '.' if $rec->{type} ne 'A' && $rec->{type} ne 'TXT' && $webvar{revrec} eq 'n' && $rec->{val} !~ /\.$/;
+  $rec->{host} .= '.' if $webvar{revrec} eq 'y' && $rec->{val} !~ /\.$/;
   $rec->{val} = "$rec->{distance}  $rec->{val}" if $rec->{type} eq 'MX';
   $rec->{val} = "$rec->{distance}  $rec->{weight}  $rec->{port}  $rec->{val}" if $rec->{type} eq 'SRV';