[7834] Paragraph.pm remove locale test

[gavinsmith0123]

Revision: 7834
          http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=7834
Author:   gavin
Date:     2017-06-18 11:35:53 -0400 (Sun, 18 Jun 2017)
Log Message:
-----------
Paragraph.pm remove locale test

Modified Paths:
--------------
    trunk/ChangeLog
    trunk/tp/Texinfo/Convert/Paragraph.pm

Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog     2017-06-18 15:27:44 UTC (rev 7833)
+++ trunk/ChangeLog     2017-06-18 15:35:53 UTC (rev 7834)
@@ -1,5 +1,12 @@
 2017-06-18  Gavin Smith  <address@hidden>
 
+       * tp/Texinfo/Convert/Paragraph.pm: Remove check for UTF-8 locale 
+       that runs "locale -a".
+       xspara_init in tp/Texinfo/Convert/XSParagraph/xspara.c does its 
+       own check which should be enough.
+
+2017-06-18  Gavin Smith  <address@hidden>
+
        * tp/Texinfo/MiscXS.pm: Remove check for UTF-8 locale, as
        "locale -a" can be slow to run (about 4.5 seconds on my computer 
        after disk caches are cleared), and tp/Texinfo/MiscXS/misc.c may

Modified: trunk/tp/Texinfo/Convert/Paragraph.pm
===================================================================
--- trunk/tp/Texinfo/Convert/Paragraph.pm       2017-06-18 15:27:44 UTC (rev 
7833)
+++ trunk/tp/Texinfo/Convert/Paragraph.pm       2017-06-18 15:35:53 UTC (rev 
7834)
@@ -51,18 +51,6 @@
 BEGIN {
   our $warning_message = undef;
   our $fatal_message = undef;
- # Check for a UTF-8 locale.  Skip the check if the 'locale' command doesn't
- # work.
-  our $a;
-  if ($^O ne 'MSWin32') {
-    $a = `locale -a 2>/dev/null`;
-  }
-  if ($a and $a !~ /UTF-8/ and $a !~ /utf8/) {
-    $fatal_message = "couldn't find a UTF-8 locale";
-  }
-  if (!$a) {
-    $warning_message = "couldn't run 'locale -a': skipping check for a UTF-8 
locale";
-  }
 
   # Save reference to subroutine before we do anything.
   my $import_fn = \&import;