Changeset 540 for trunk

Timestamp:

12/06/13 14:54:04 (11 years ago)

Author:

Kris Deugau

Message:

/trunk

Make sure changes made by compact-recs.pl actually get published, by
setting the "changed" flag on the relevant zone(s)

File:

• trunk/compact-recs.pl (modified) (1 diff)

trunk/compact-recs.pl

@@ -120 +120 @@
     $dbh->do("INSERT INTO records (domain_id, rdns_id, host, type, val, ttl, location) VALUES (?,?,?,?,?,?,?)",
         undef, ($dparent, $zone, $patt, $newtype, $cidr, $soa->{minttl}, $ploc) );
+    $dbh->do("UPDATE revzones SET changed='y' WHERE rdns_id = ?", undef, ($zone));
+    $dbh->do("UPDATE domains SET changed='y' WHERE domain_id = ?", undef, ($dparent)) if $dparent;
     $dnsdb->_log(rdns_id => $zone, domain_id => $dparent, group_id => 1,
         entry => "A+PTR and/or PTR records in $cidr matching $patt replaced by $typemap{$newtype} record for $cidr");