- Timestamp:
- 10/30/12 12:34:14 (12 years ago)
- Location:
- branches/stable
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/stable/DNSDB.pm
r437 r438 32 32 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); 33 33 34 $VERSION = "1.0. 4"; ##VERSION##34 $VERSION = "1.0.5"; ##VERSION## 35 35 @ISA = qw(Exporter); 36 36 @EXPORT_OK = qw( … … 1811 1811 $nsflag = 1 if $type eq 'NS'; 1812 1812 1813 my @vallist = ($dom_id, $rr->name, $reverse_typemap{$type}, $ rr->ttl);1813 my @vallist = ($dom_id, $rr->name, $reverse_typemap{$type}, $ttl); 1814 1814 1815 1815 # "Primary" types: -
branches/stable/Makefile
r434 r438 3 3 4 4 PKGNAME=dnsadmin 5 VERSION=1.0. 45 VERSION=1.0.5 6 6 RELEASE=1 7 7 -
branches/stable/dns.cgi
r437 r438 1487 1487 my %row; 1488 1488 my ($code,$msg) = importAXFR($dbh, $webvar{ifrom}, $domain, $webvar{group}, 1489 $webvar{domstatus}, $webvar{rwsoa}, $webvar{rwns}, ($webvar{forcettl} );1489 $webvar{domstatus}, $webvar{rwsoa}, $webvar{rwns}, ($webvar{forcettl} ? $webvar{newttl} : 0) ); 1490 1490 $row{domok} = $msg if $code eq 'OK'; 1491 1491 if ($code eq 'WARN') {
Note:
See TracChangeset
for help on using the changeset viewer.