- Timestamp:
- 02/18/15 17:59:27 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/DNSDB.pm
r677 r679 4314 4314 my $self = shift; 4315 4315 my $dbh = $self->{dbh}; 4316 4316 4317 my $defrec = shift; 4317 4318 my $revrec = shift; … … 6002 6003 } 6003 6004 } 6004 } 6005 } # __publish_subnet 6005 6006 6006 6007 ## And now the meat. … … 6231 6232 return if $val->{isv6}; 6232 6233 6233 if ($val->masklen < =16) {6234 if ($val->masklen < 16) { 6234 6235 foreach my $sub ($val->split(16)) { 6235 6236 $self->__publish_subnet($sub, $recflags, $host, $datafile, $ttl, $stamp, $loc, $zone, 0);
Note:
See TracChangeset
for help on using the changeset viewer.