From: Philip Newton <pne@cpan.org>
Date: Tue, 11 Jun 2002 06:28:08 +0000 (+0200)
Subject: Detype locale.c comment
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fca394fcca6f8b19f183027c66da8a99bb43312d;p=p5sagit%2Fp5-mst-13.2.git

Detype locale.c comment
Message-ID: <b0vagu8197d5jn2c5pt8al97loreugl9e5@4ax.com>

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

diff --git a/locale.c b/locale.c
index bb497bc..0986614 100644
--- a/locale.c
+++ b/locale.c
@@ -475,14 +475,14 @@ Perl_init_i18nl10n(pTHX_ int printwarn)
 
 #ifdef USE_PERLIO
     {
-      /* Set PL_wantut8 to TRUE if using PerlIO _and_
+      /* Set PL_wantutf8 to TRUE if using PerlIO _and_
 	 any of the following are true:
 	 - nl_langinfo(CODESET) contains /^utf-?8/i
 	 - $ENV{LANGUAGE} contains /^utf-?8/i (only if using glibc)
 	 - $ENV{LC_CALL} contains /^utf-?8/i
 	 - $ENV{LC_CTYPE} contains /^utf-?8/i
 	 - $ENV{LANG} contains /^utf-?8/i
-	 If PL_wantutf8 is true the perl.c:S_parse_body()
+	 If PL_wantutf8 is true, perl.c:S_parse_body()
 	 will turn on the PerlIO :utf8 discipline on STDIN, STDOUT,
 	 STDERR, _and_ the default open discipline.
       */