Changeset 613 for trunk/DNSDB.pm

Timestamp:

04/22/14 17:48:17 (10 years ago)

Author:

Kris Deugau

Message:

/trunk

Fix rather more subtle bug in code fragment move from r611.

File:

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

trunk/DNSDB.pm

@@ -507 +507 @@
     # ${$args{val}} is either a valid IP or a string ending with the .arpa zone name;
     # now check if it's a well-formed FQDN
-    return ('FAIL', $errstr) if ! _check_hostname_form($args{val}, ${$args{rectype}}, $args{defrec}, $args{revrec}) &&
+    return ('FAIL', $errstr) if ! _check_hostname_form(${$args{val}}, ${$args{rectype}}, $args{defrec}, $args{revrec}) &&
         ${$args{val}} =~ /\.arpa$/;