patch@2009-05-25.21:50:08 magic.t leaves $ENV{foo} on VMS.

[p5sagit/p5-mst-13.2.git] / t / op / bop.t

diff --git a/t/op/bop.t b/t/op/bop.t
index bc61c58..b7f82ee 100755 (executable)
--- a/t/op/bop.t
+++ b/t/op/bop.t
@@ -447,7 +447,7 @@ for my $str ("x", "\x{100}") {
 }
 
 sub PVBM () { "X" }
-index PVBM, "foo";
+index "foo", PVBM;
 
 my $warn = 0;
 local $^W = 1;