# HG changeset patch # User Heiko Schlittermann (JUMPER) # Date 1421869305 -3600 # Node ID aff0448cbef9144e9304b0c4fab426b8d44979da # Parent bedb2cce973e84d9e36c578997d307a83a9925ec cope with additional spaces in soa records diff -r bedb2cce973e -r aff0448cbef9 debian/rules --- a/debian/rules Wed Jan 21 20:33:49 2015 +0100 +++ b/debian/rules Wed Jan 21 20:41:45 2015 +0100 @@ -1,4 +1,11 @@ #! /usr/bin/make -f +export PERL_MM_OPT= +export PERL_MB_OPT= +export PERL5LIB= + %: - PERL_MM_OPT= PERL_MB_OPT= dh $@ + $@ + +override_dh_installchangelogs: + dh_installchangelogs CHANGES diff -r bedb2cce973e -r aff0448cbef9 lib/DNS/Vi.pm --- a/lib/DNS/Vi.pm Wed Jan 21 20:33:49 2015 +0100 +++ b/lib/DNS/Vi.pm Wed Jan 21 20:41:45 2015 +0100 @@ -58,8 +58,8 @@ next if $rrset{rrtype} ~~ $arg{-skip}; if ($rrset{rrtype} eq 'SOA') { - next if $soa_seen; - $soa_seen = 1; + next if $soa_seen++; + $rrset{data} =~ s/\s+/ /g; # squeeze spaces } # label ergänzen, wenn nicht FQDN diff -r bedb2cce973e -r aff0448cbef9 t/10-dnsvi.t --- a/t/10-dnsvi.t Wed Jan 21 20:33:49 2015 +0100 +++ b/t/10-dnsvi.t Wed Jan 21 20:41:45 2015 +0100 @@ -38,6 +38,9 @@ TXT => 4, AAAA => 0, MX => 0, + SOA => { + 'km21.de.' => ['pu.km21.de. hostmaster.schlittermann.de. 1397766411 86400 7200 604800 300'], + }, }, b => { RRSETS => 11, diff -r bedb2cce973e -r aff0448cbef9 t/samples/a --- a/t/samples/a Wed Jan 21 20:33:49 2015 +0100 +++ b/t/samples/a Wed Jan 21 20:41:45 2015 +0100 @@ -1,7 +1,8 @@ $ORIGIN km21.de. $TTL 1d ; do NOT EDIT the SOA records SERIAL number! -@ SOA pu.schlittermann.de. hostmaster.schlittermann.de. 1397766411 86400 7200 604800 300 +; keep the spaces in the next line! +@ SOA pu hostmaster.schlittermann.de. 1397766411 86400 7200 604800 300 NS hh.schlittermann.de. NS pu.schlittermann.de. TXT "invoice: self"