[perl #113926] fix a hash randomization bug

Through sheer sloppiness I managed to avoid actually running the new
test, sorry for the noise.

it compared [ keys %hasha ] and [ keys %hashb ] resulting in failure.

diff --git a/ext/Pod-Html/t/anchorify.t b/ext/Pod-Html/t/anchorify.t
index 96b7e14..d7b1808 100644 (file)
--- a/ext/Pod-Html/t/anchorify.t
+++ b/ext/Pod-Html/t/anchorify.t
@@ -37,8 +37,8 @@ my %expected = map { $_ => 1 } qw(
     has_hyphen_and_space
 );
 is_deeply(
-    [ keys %heads ],
-    [ keys %expected ],
+    \%heads,
+    \%expected,
     "Got expected POD heads"
 );