diff options
Diffstat (limited to 't/op/local.t')
| -rwxr-xr-x | t/op/local.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/local.t b/t/op/local.t index 011e543d1b..5bf56af36a 100755 --- a/t/op/local.t +++ b/t/op/local.t @@ -454,7 +454,7 @@ sub f { ok(0 == $[); } like( runperl(stderr => 1, prog => 'use constant foo => q(a);' . 'index(q(a), foo);' . - 'local *g=${::}{foo};print "ok";'), "ok", "[perl #52740]"); + 'local *g=${::}{foo};print q(ok);'), "ok", "[perl #52740]"); # Keep this test last, as it can SEGV { |