summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2003-09-12 17:59:25 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2003-09-12 17:59:25 +0000
commit1e54db1a8aea187ba2e790aca2ab81fab24ff92d (patch)
tree612c4d590d91d3b2799cf3efb3af0b7d460a3a52 /pp_sys.c
parent1db354ff70705eb3822ae7ef1851e7d133e23f00 (diff)
downloadperl-1e54db1a8aea187ba2e790aca2ab81fab24ff92d.tar.gz
It's UTF-8, not UTF8. (Note: not s/UTF-8/UTF8/,
since that would break a lot of code.) Also few stray UTF16s, UTF32s, and "encoded in Unicode". p4raw-id: //depot/perl@21198
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 72af678858..0a3c95e159 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -1579,7 +1579,7 @@ PP(pp_sysread)
}
if ((fp_utf8 = PerlIO_isutf8(IoIFP(io))) && !IN_BYTES) {
buffer = SvPVutf8_force(bufsv, blen);
- /* UTF8 may not have been set if they are all low bytes */
+ /* UTF-8 may not have been set if they are all low bytes */
SvUTF8_on(bufsv);
}
else {