*** gendns.pl	Sat Jun 17 23:49:40 2000
--- gendns.new	Thu Feb  1 14:34:53 2001
***************
*** 693,698 ****
--- 693,699 ----
  
  	# save the header and SOA record
  	$domain{$domain} = "\$ORIGIN $origin_domain.\n";
+ 	$domain{$domain} .= "\$TTL $min\n";
  	$domain{$domain} .= "@\tIN SOA\t$server. $contact. ( $Dateserial $refresh $retry $expire $min )\n";
  }