diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-10-13 15:16:53 +0100 |
---|---|---|
committer | Jesse Vincent <jesse@bestpractical.com> | 2009-10-16 12:30:15 -0400 |
commit | bb19cdcde94e10abb00ef5f784a633998ecc79a9 (patch) | |
tree | a65c3dab96bf2023956917fbc8db6bac186d98f3 /t | |
parent | 136c2a5ed8214b1a6791e11379cbee1edd6c291c (diff) | |
download | perl-bb19cdcde94e10abb00ef5f784a633998ecc79a9.tar.gz |
do subname() is deprecated, so update this hunk of test dating from perl 1.
Diffstat (limited to 't')
-rw-r--r-- | t/op/chop.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/chop.t b/t/op/chop.t index 503f6f70ca..39577c2f65 100644 --- a/t/op/chop.t +++ b/t/op/chop.t @@ -9,7 +9,7 @@ BEGIN { plan tests => 139; $_ = 'abc'; -$c = do foo(); +$c = foo(); is ($c . $_, 'cab', 'optimized'); $_ = 'abc'; |