Changeset 252

Timestamp:

02/29/12 17:07:28 (13 years ago)

Author:

Kris Deugau

Message:

/trunk

Fix buglet introduced in r249 to tweak addRec() calling convention

File:

• trunk/DNSDB.pm (modified) (2 diffs)

trunk/DNSDB.pm

@@ -1996 +1996 @@
 
   # prep for validation
-  my $addr = NetAddr::IP->new($val);
-  $host =~ s/\.+$//;    # FQDNs ending in . are an internal detail, and really shouldn't be exposed in the UI.
+  my $addr = NetAddr::IP->new($$val);
+  $$host =~ s/\.+$//;   # FQDNs ending in . are an internal detail, and really shouldn't be exposed in the UI.
 
   my $domid = 0;
@@ -2012 +2012 @@
   # of types.  Other things may also be added to validate default records of several flavours.
   return ('FAIL', "Hostnames may not contain anything other than (0-9 a-z . _)")
-        if $defrec eq 'n' && $host !~ /^[0-9a-z_%.]+$/i;
+        if $defrec eq 'n' && $$host !~ /^[0-9a-z_%.]+$/i;
 
   # Collect these even if we're only doing a simple A record so we can call *any* validation sub