This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove B::OP:terse
[perl5.git] / ext / B / B / Terse.pm
index 1749f32..681112e 100644 (file)
@@ -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);