From: Nicholas Clark <nick@ccl4.org>
Date: Tue, 13 Oct 2009 14:16:53 +0000 (+0100)
Subject: do subname() is deprecated, so update this hunk of test dating from perl 1.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=bb19cdcde94e10abb00ef5f784a633998ecc79a9;p=p5sagit%2Fp5-mst-13.2.git

do subname() is deprecated, so update this hunk of test dating from perl 1.
---

diff --git a/t/op/chop.t b/t/op/chop.t
index 503f6f7..39577c2 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';