summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorHugo van der Sanden <hv@crypt.org>2001-05-29 04:03:45 +0100
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-29 02:15:24 +0000
commit081e4e8ae6719b3a129e78ce5bbd1f8db2638dcc (patch)
tree177e8b6ebf6b402ccf30bff91ac04fb242438358 /pp_ctl.c
parent8fe05de6219a82cdabb2b00b140842462585472b (diff)
downloadperl-081e4e8ae6719b3a129e78ce5bbd1f8db2638dcc.tar.gz
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
Diffstat (limited to 'pp_ctl.c')
-rw-r--r--pp_ctl.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index 8e12e2b52c..0d2d2cdf06 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