diff options
| author | Slaven Rezic <slaven@rezic.de> | 2008-02-29 12:29:31 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-02-29 12:59:55 +0000 |
| commit | df029878ce10ba115451deaf98191420c0c2f438 (patch) | |
| tree | 9a190f19853c3939a986c3676f8aeed51133d9d1 /lib/Fatal.pm | |
| parent | 451405367bf1d47e02fcb61d3526979949ff038f (diff) | |
| download | perl-df029878ce10ba115451deaf98191420c0c2f438.tar.gz | |
More diagnostics for Fatal.pm
Message-ID: <49601.89.247.126.95.1204280971.squirrel@mail.rezic.de>
plus version bump
p4raw-id: //depot/perl@33399
Diffstat (limited to 'lib/Fatal.pm')
| -rw-r--r-- | lib/Fatal.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Fatal.pm b/lib/Fatal.pm index 69866d9f66..0b4bf9bc99 100644 --- a/lib/Fatal.pm +++ b/lib/Fatal.pm @@ -5,7 +5,7 @@ use Carp; use strict; our($AUTOLOAD, $Debug, $VERSION); -$VERSION = 1.05; +$VERSION = 1.06; $Debug = 0 unless defined $Debug; @@ -106,7 +106,7 @@ sub _make_fatal { $proto = eval { prototype "CORE::$name" }; die "$name is neither a builtin, nor a Perl subroutine" if $@; - die "Cannot make a non-overridable builtin fatal" + die "Cannot make the non-overridable builtin $name fatal" if not defined $proto; $core = 1; $call = "CORE::$name"; |