From: Shawn M Moore Date: Tue, 19 May 2009 16:10:50 +0000 (-0400) Subject: Localize $SIG{__DIE__} inside _try_load_one_class X-Git-Tag: 0.85~9 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b3813a8c2b36157cb2c3e2e362d14f18972589d3;p=gitmo%2FClass-MOP.git Localize $SIG{__DIE__} inside _try_load_one_class --- diff --git a/Changes b/Changes index 20c7caf..215bbc2 100644 --- a/Changes +++ b/Changes @@ -8,6 +8,9 @@ Revision history for Perl extension Class-MOP. - Tweak original commit so the intent matches the accepted behavior (Nicholas Perez) + * Class::MOP + - Localize $SIG{__DIE__} inside _try_load_one_class (Sartak) + 0.84 Tue, May 12, 2009 * Makefile.PL - Depend on Text::Exception 0.27 to avoid failing tests ond old diff --git a/lib/Class/MOP.pm b/lib/Class/MOP.pm index 5705215..846869f 100644 --- a/lib/Class/MOP.pm +++ b/lib/Class/MOP.pm @@ -131,6 +131,7 @@ sub _try_load_one_class { return do { local $@; + local $SIG{__DIE__}; eval { require($file) }; $@; };