--- a/t/10-dnsvi.t	Tue Feb 03 23:10:38 2015 +0100
+++ b/t/10-dnsvi.t	Thu Apr 09 13:25:31 2015 +0200
@@ -72,14 +72,21 @@
         RRSETS => 15,
         SOA    => 1,
         NS     => 2,
-        A      => [sort qw/
+        A      => [qw/
 	    abc.de.km21.de.
 	    foo.km21.de.
 	    tte.km21.de.
 	    tte.km21.de.
 	    bar.km21.de.
 	/],
-        TXT    => 5,
+        TXT    => { 
+	    'km21.de.' => [ map { "\"$_\"" }
+		'invoice: self', 
+		'utf8: km21.de', 
+		'start: 1396981300 2014-04-08T20:21:40', 
+	    ],
+	    'tte.km21.de.' => [ map { "\"$_\"" } 'tte', 'tte2' ],
+	},
         AAAA   => 0,
         MX     => 2,
     },
@@ -112,12 +119,12 @@
         foreach my $type (@sets) {
 	    if (ref $expect{$type} eq ref[]) {
 		my @entries = sort map { $_->{label} } grep { $_->{rrtype} eq $type } map { $_->{rrset} } @zone;
-		is_deeply \@entries, $expect{$type} => 'list of labels';
+		is_deeply \@entries, [sort @{$expect{$type}} ] => 'list of labels';
 	    }
 	    elsif (ref $expect{$type} eq ref{}) {
 		foreach my $label (keys %{ $expect{$type} }) {
 		    my @entries = sort map { $_->{data} } grep { $_->{label} eq $label and $_->{rrtype} eq $type } map { $_->{rrset} } @zone;
-		    is_deeply \@entries, $expect{$type}{$label} => 'complete rrsets',
+		    is_deeply \@entries, [sort @{ $expect{$type}{$label} }] => 'complete rrsets',
 		}
 	    }
 	    else {