projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
e57fbd1
)
use base problem
author
Shawn
<svicalifornia@gmail.com>
Mon, 1 Oct 2007 12:45:32 +0000
(
05:45
-0700)
committer
Rafael Garcia-Suarez
<rgarciasuarez@gmail.com>
Tue, 2 Oct 2007 12:08:47 +0000
(12:08 +0000)
Message-ID: <
1191267932
.150186.12570@d55g2000hsg.googlegroups.com>
(This patch is actually not needed for 5.10, but useful for earlier perls)
p4raw-id: //depot/perl@32005
lib/base.pm
patch
|
blob
|
history
diff --git
a/lib/base.pm
b/lib/base.pm
index
abbacb6
..
be4c667
100644
(file)
--- a/
lib/base.pm
+++ b/
lib/base.pm
@@
-100,7
+100,7
@@
Base class package "$base" is empty.
or make that module available in \@INC (\@INC contains: @INC).
ERROR
}
- $sigdie = $SIG{__DIE__};
+ $sigdie = $SIG{__DIE__}
|| undef
;
}
# Make sure a global $SIG{__DIE__} makes it out of the localization.
$SIG{__DIE__} = $sigdie if defined $sigdie;