# HG changeset patch
# User Heiko Schlittermann (JUMPER) <hs@schlittermann.de>
# Date 1421878079 -3600
# Node ID 04e08079f218cc27ab5d9fc42c765dfca3870451
# Parent  0f7e871c4672afa8c8890b83c1a9dc50fc33827c
cosmetical changes

diff -r 0f7e871c4672 -r 04e08079f218 lib/DNS/Vi.pm
--- a/lib/DNS/Vi.pm	Wed Jan 21 23:07:35 2015 +0100
+++ b/lib/DNS/Vi.pm	Wed Jan 21 23:07:59 2015 +0100
@@ -26,8 +26,6 @@
     my $data  = shift;
     my @lines = split /\n/, $data;
 
-    ### @lines
-
     my @zone;
     my ($origin, $ttl, $last_label, $soa_seen);
 
@@ -101,15 +99,11 @@
                 }
                 my $id = sha512_hex(join "\0", sort %rrset);
                 push @zone, { id => $id, rrset => \%rrset };
+		### x: $zone[-1]
             }
         }
     }
 
-    # list of {
-    #	id => $id,
-    #	rrset => { label => …, ttl => …, rrtype => …, data => … }
-    # }
-    ### @zone
     return @zone;
 }