Changeset 649 for branches/stable/compact-recs.pl

Timestamp:

06/23/14 17:52:37 (10 years ago)

Author:

Kris Deugau

Message:

/branches/stable

Subtle bugfix merge! All changes from /trunk r589 through r648 merged.

Location:

branches/stable

Files:

• . (modified) (1 prop)
• compact-recs.pl (modified) (1 diff)

branches/stable/compact-recs.pl

@@ -103 +103 @@
   eval {
     my $getsth = $dbh->prepare("SELECT record_id,host,val FROM records ".
-        "WHERE (type = 12 OR type > 65000) AND CAST(val AS inet) << ?");
+        "WHERE (type = 12 OR type > 65000) AND inetlazy(val) << ?");
     my $delsth = $dbh->prepare("DELETE FROM records WHERE record_id = ?");
     $getsth->execute($cidr);