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 (file)
--- 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.
       */