diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Carp/Heavy.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/Carp/Heavy.pm b/lib/Carp/Heavy.pm index a293b59a09..15f8188d4e 100644 --- a/lib/Carp/Heavy.pm +++ b/lib/Carp/Heavy.pm @@ -192,8 +192,8 @@ sub ret_backtrace { $i++; my $tid_msg = ''; - if (defined &Thread::tid) { - my $tid = Thread->self->tid; + if (defined &threads::tid) { + my $tid = threads->tid; $tid_msg = " thread $tid" if $tid; } @@ -213,8 +213,8 @@ sub ret_summary { $i++; my $tid_msg = ''; - if (defined &Thread::tid) { - my $tid = Thread->self->tid; + if (defined &threads::tid) { + my $tid = threads->tid; $tid_msg = " thread $tid" if $tid; } |