Fix test to pass en 5.6.2 (unpack is needed by version.pm there)
[p5sagit/p5-mst-13.2.git] / ext / Safe / t / safeload.t
index 6817c2c..b15c290 100644 (file)
@@ -25,6 +25,6 @@ use Safe;
 plan(tests => 1);
 
 my $c = new Safe;
-$c->permit(qw(require caller));
+$c->permit(qw(require caller entereval unpack));
 my $r = $c->reval(q{ use version; 1 });
 ok( defined $r, "Can load version.pm in a Safe compartment" ) or diag $@;