threads::shared 1.24 (phase 2)

[p5sagit/p5-mst-13.2.git] / lib / Carp.pm

diff --git a/lib/Carp.pm b/lib/Carp.pm
index 15e39e5..7319a30 100644 (file)
--- a/lib/Carp.pm
+++ b/lib/Carp.pm
@@ -1,6 +1,6 @@
 package Carp;
 
-our $VERSION = '1.06';
+our $VERSION = '1.09';
 # this file is an utra-lightweight stub. The first time a function is
 # called, Carp::Heavy is loaded, and the real short/longmessmess_jmp
 # subs are installed
@@ -32,13 +32,13 @@ sub longmess_jmp  {
     local($@, $!);
     eval { require Carp::Heavy };
     return $@ if $@;
-    goto &longmess_jmp;
+    goto &longmess_real;
 }
 sub shortmess_jmp  {
     local($@, $!);
     eval { require Carp::Heavy };
     return $@ if $@;
-    goto &shortmess_jmp;
+    goto &shortmess_real;
 }
 
 sub croak   { die  shortmess @_ }
@@ -143,7 +143,7 @@ This feature is enabled by 'importing' the non-existent symbol
 
     perl -MCarp=verbose script.pl
 
-or by including the string C<MCarp=verbose> in the PERL5OPT
+or by including the string C<-MCarp=verbose> in the PERL5OPT
 environment variable.
 
 Alternately, you can set the global variable C<$Carp::Verbose> to true.