--- AnyEvent/lib/AnyEvent/DNS.pm	2008/05/25 04:31:49	1.30
+++ AnyEvent/lib/AnyEvent/DNS.pm	2008/05/25 23:55:28	1.31
@@ -242,7 +242,7 @@
          $cb->(
             map $_->[2],
             sort {
-               $AnyEvent::PROTOCOL{$a->[1]} <=> $AnyEvent::PROTOCOL{$b->[1]}
+               $AnyEvent::PROTOCOL{$b->[1]} <=> $AnyEvent::PROTOCOL{$a->[1]}
                   or $a->[0] <=> $b->[0]
             }
             @res