diff options
author | Kevin Ryde <unknown> | 2008-11-01 09:27:09 -0700 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-11-03 11:15:20 +0000 |
commit | 2a6a7022ea46998eae15a751beb5b65986a938f3 (patch) | |
tree | f6fcd26bbd535fcd150f5dadec3c7da7f96454e5 /lib/Carp.pm | |
parent | 71f20845bf38b3faa98fc5d8068e1e7dca33cda5 (diff) | |
download | perl-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.pm | 4 |
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") }; |