Changeset 121 for trunk/DNSDB.pm

Timestamp:

09/08/11 18:09:58 (13 years ago)

Author:

Kris Deugau

Message:

/trunk

checkpoint
Flesh out getSOA() stub in dns-rpc.cgi
Tweak getSOA() in DNSDB.pm for better error handling

File:

• trunk/DNSDB.pm (modified) (1 diff)

trunk/DNSDB.pm

@@ -1048 +1048 @@
   $sth->execute($id);
 
-  my ($recid,$host,$val,$ttl,$serial) = $sth->fetchrow_array();
+  my ($recid,$host,$val,$ttl,$serial) = $sth->fetchrow_array() or return;
   my ($prins,$contact) = split /:/, $host;
   my ($refresh,$retry,$expire,$minttl) = split /:/, $val;