diff options
Diffstat (limited to 'ext/B')
-rw-r--r-- | ext/B/B/Terse.pm | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/ext/B/B/Terse.pm b/ext/B/B/Terse.pm index 1749f326a1..681112e904 100644 --- a/ext/B/B/Terse.pm +++ b/ext/B/B/Terse.pm @@ -1,6 +1,6 @@ package B::Terse; -our $VERSION = '1.07'; +our $VERSION = '1.08'; use strict; use B qw(class @specialsv_name); @@ -30,12 +30,6 @@ sub indent { return " " x $level; } -# Don't use this, at least on OPs in subroutines: it has no way of -# getting to the pad, and will give wrong answers or crash. -sub B::OP::terse { - carp "B::OP::terse is deprecated and will go away in Perl 5.28; use B::Concise instead"; - B::Concise::b_terse(@_); -} sub B::SV::terse { my($sv, $level) = (@_, 0); |