> Date: Sat, 23 Jan 2016 13:10:28 +0000
> From: Gavin Smith <[email protected]>
> Cc: Kiyoshi KANAZAWA <[email protected]>, Texinfo 
> <[email protected]>
> 
> # Check for a UTF-8 locale.  Skip the check if the 'locale' command doesn't
> # work.
> my $a = `locale -a 2>/dev/null`;
> if ($a and $a !~ /UTF-8/ and $a !~ /utf8/) {
>   _fatal "couldn't find a UTF-8 locale";
>   goto FALLBACK;
> }
> if (!$a) {
>   _debug "couldn't run 'locale -a': skipping check for a UTF-8 locale";
> }

Btw, this relies on shell's support of /dev/null, which won't happen
on Windows.  If there's a way to use the null device instead (is it
"File::Spec->devnull"?), that would be better, I think.

Reply via email to