Changeset 441 for trunk

Timestamp:

11/15/12 11:32:47 (12 years ago)

Author:

Kris Deugau

Message:

/trunk

Fix coding thinko in export; not sure why I thought $host, $type, and $val
would be references right after being filled in by $sth->fetchrow_array

File:

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

trunk/DNSDB.pm

@@ -4656 +4656 @@
 
         # Spaces are evil.
-        $$host =~ s/^\s+//;
-        $$host =~ s/\s+$//;
-        if ($typemap{$$type} ne 'TXT') {
+        $host =~ s/^\s+//;
+        $host =~ s/\s+$//;
+        if ($typemap{$type} ne 'TXT') {
           # Leading or trailng spaces could be legit in TXT records.
-          $$val =~ s/^\s+//;
-          $$val =~ s/\s+$//;
+          $val =~ s/^\s+//;
+          $val =~ s/\s+$//;
         }