From: Hugo van der Sanden <hv@crypt.org>
Date: Tue, 29 May 2001 03:03:45 +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=081e4e8ae6719b3a129e78ce5bbd1f8db2638dcc;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: <200105290203.DAA00825@crypt.compulink.co.uk>

Explanation why the $@ always gets the UTF8 flag when under use utf8--
because we told it to have the flag when under use utf8.

p4raw-id: //depot/perl@10278
---

diff --git a/pp_ctl.c b/pp_ctl.c
index 8e12e2b..0d2d2cd 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -1434,10 +1434,6 @@ Perl_die_where(pTHX_ char *message, STRLEN msglen)
 	    }
 	    else {
 		sv_setpvn(ERRSV, message, msglen);
-		if (PL_hints & HINT_UTF8)
-		    SvUTF8_on(ERRSV);
-		else
-		    SvUTF8_off(ERRSV);
 	    }
 	}
 	else