Fix a thinko in regression test for [perl #54956]
authorBen Morrow <ben@morrow.me.uk>
Sat, 3 Jan 2009 08:23:32 +0000 (09:23 +0100)
committerDavid Mitchell <davem@iabyn.com>
Mon, 30 Mar 2009 22:46:57 +0000 (23:46 +0100)
(follows to commit 8c8eee8276dbc780932b841fe5183943a7117a3d)

(cherry picked from commit 44250bdc17df7fe8bb261563edbd7aeb85406e89)

t/op/bop.t

index bc61c58..b7f82ee 100755 (executable)
@@ -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;