From: Hugo van der Sanden Date: Wed, 30 May 2001 11:59:19 +0000 (+0100) Subject: Re: [ID 20010528.004] dual bug under utf8: $@ has UTF8 flag and \s+ does not match X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=04073e4ceb0fb04f5cbbda390bf49a087fb6969c;p=p5sagit%2Fp5-mst-13.2.git Re: [ID 20010528.004] dual bug under utf8: $@ has UTF8 flag and \s+ does not match Message-Id: <200105301059.LAA03182@crypt.compulink.co.uk> localizing $@ has unfortunate semantics - if you die past a local $@, the die message is lost. p4raw-id: //depot/perl@10310 --- diff --git a/lib/utf8_heavy.pl b/lib/utf8_heavy.pl index 3ac4ef9..2327d3d 100644 --- a/lib/utf8_heavy.pl +++ b/lib/utf8_heavy.pl @@ -36,8 +36,6 @@ sub SWASHNEW { } { - local $@; - $list ||= ($caller ne 'main' && eval { $caller->$type(); }) || do "$file.pl" || do "$encoding/$file.pl"