Changeset 413

Timestamp:

10/05/12 14:54:43 (12 years ago)

Author:

Kris Deugau

Message:

/trunk

Update dns-rpc.cgi getSOA. See #43.

File:

• trunk/dns-rpc.cgi (modified) (1 diff)

trunk/dns-rpc.cgi

@@ -286 +286 @@
   _commoncheck(\%args);
 
-  my %ret = DNSDB::getSOA($dbh, $args{def}, $args{id});
-  if (!$ret{recid}) {
-    if ($args{def} eq 'y') {
+  my $ret = DNSDB::getSOA($dbh, $args{defrec}, $args{revrec}, $args{id});
+  if (!$ret) {
+    if ($args{defrec} eq 'y') {
       die "No default SOA record in group\n";
     } else {
-      die "No SOA record in domain\n";
+      die "No SOA record in zone\n";
     }
   }
-  return \%ret;
+  return $ret;
 }