This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
locale.c: Fix comment
authorKarl Williamson <khw@cpan.org>
Fri, 6 Feb 2015 17:18:39 +0000 (10:18 -0700)
committerKarl Williamson <khw@cpan.org>
Fri, 6 Feb 2015 18:36:46 +0000 (11:36 -0700)
locale.c

index 625ece7..7332c4b 100644 (file)
--- a/locale.c
+++ b/locale.c
@@ -574,7 +574,7 @@ Perl_my_setlocale(pTHX_ int category, const char* locale)
         return result;
     }
 
-    /* Here the input locale was LC_ALL, and we have set it to what is in the
+    /* Here the input category was LC_ALL, and we have set it to what is in the
      * LANG variable or the system default if there is no LANG.  But these have
      * lower priority than the other LC_foo variables, so override it for each
      * one that is set.  (If they are set to "", it means to use the same thing