diff options
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/tlperl/lib/Carp/Heavy.pm')
-rw-r--r-- | systems/texlive/tlnet/tlpkg/tlperl/lib/Carp/Heavy.pm | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/lib/Carp/Heavy.pm b/systems/texlive/tlnet/tlpkg/tlperl/lib/Carp/Heavy.pm new file mode 100644 index 0000000000..a9b803c76a --- /dev/null +++ b/systems/texlive/tlnet/tlpkg/tlperl/lib/Carp/Heavy.pm @@ -0,0 +1,21 @@ +package Carp::Heavy; + +use Carp (); + +our $VERSION = '1.50'; +$VERSION =~ tr/_//d; + +# Carp::Heavy was merged into Carp in version 1.12. Any mismatched versions +# after this point are not significant and can be ignored. +if(($Carp::VERSION || 0) < 1.12) { + my $cv = defined($Carp::VERSION) ? $Carp::VERSION : "undef"; + die "Version mismatch between Carp $cv ($INC{q(Carp.pm)}) and Carp::Heavy $VERSION ($INC{q(Carp/Heavy.pm)}). Did you alter \@INC after Carp was loaded?\n"; +} + +1; + +# Most of the machinery of Carp used to be here. +# It has been moved in Carp.pm now, but this placeholder remains for +# the benefit of modules that like to preload Carp::Heavy directly. +# This must load Carp, because some modules rely on the historical +# behaviour of Carp::Heavy loading Carp. |