summaryrefslogtreecommitdiff
path: root/ext/B
diff options
context:
space:
mode:
authorAbigail <abigail@abigail.be>2017-06-06 20:59:59 +0200
committerAbigail <abigail@abigail.be>2017-06-06 20:59:59 +0200
commitd0d6d4ceec7b551df4a20f5eea6133da85eba732 (patch)
treed3ed9081f9328699b83260af56cddab9407cf5a6 /ext/B
parent02729eaba412e86edc1654b753afe2a2fc9de5d8 (diff)
downloadperl-d0d6d4ceec7b551df4a20f5eea6133da85eba732.tar.gz
Remove B::OP:terse
This method was deprecated, and, according to the comments, didn't work correctly anyway.
Diffstat (limited to 'ext/B')
-rw-r--r--ext/B/B/Terse.pm8
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);