summaryrefslogtreecommitdiff
path: root/lib/Carp.pm
diff options
context:
space:
mode:
authorKevin Ryde <unknown>2008-11-01 09:27:09 -0700
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-11-03 11:15:20 +0000
commit2a6a7022ea46998eae15a751beb5b65986a938f3 (patch)
treef6fcd26bbd535fcd150f5dadec3c7da7f96454e5 /lib/Carp.pm
parent71f20845bf38b3faa98fc5d8068e1e7dca33cda5 (diff)
downloadperl-2a6a7022ea46998eae15a751beb5b65986a938f3.tar.gz
[perl #60300] doc Carp $Carp::Internal{__PACKAGE__} example
From: Kevin Ryde (via RT) <perlbug-followup@perl.org> Message-ID: <rt-3.6.HEAD-29762-1225582029-1073.60300-75-0@perl.org> p4raw-id: //depot/perl@34703
Diffstat (limited to 'lib/Carp.pm')
-rw-r--r--lib/Carp.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Carp.pm b/lib/Carp.pm
index 7319a30719..fe24c07453 100644
--- a/lib/Carp.pm
+++ b/lib/Carp.pm
@@ -1,6 +1,6 @@
package Carp;
-our $VERSION = '1.09';
+our $VERSION = '1.10';
# 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
@@ -187,7 +187,7 @@ This says what packages are internal to Perl. C<Carp> will never
report an error as being from a line in a package that is internal to
Perl. For example:
- $Carp::Internal{ __PACKAGE__ }++;
+ $Carp::Internal{ (__PACKAGE__) }++;
# time passes...
sub foo { ... or confess("whatever") };