mirror/opustags
1
0
Fork 0
mirror of https://github.com/fmang/opustags.git synced 2025-01-28 19:05:03 +01:00
Code Issues Packages Projects Releases Wiki Activity

t: skip locale test when fr_FR.iso88591 is missing

Browse Source
This commit is contained in:
Frédéric Mangano-Tarumi 2018-12-19 19:49:25 -05:00
parent cacbd43422
commit 191796a3d2
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
t/opustags.t
View File

@ -13,6 +13,7 @@ use Test::More tests => 34;
use Digest::MD5;
use File::Basename;
use IPC::Open3;
use List::MoreUtils qw(any);
use Symbol 'gensym';
my $opustags = '../opustags';
@ -213,9 +214,15 @@ unlink('muxed.ogg');
####################################################################################################
# Locale
my $locale = 'fr_FR.iso88591';
my @all_locales = split(' ', `locale -a`);
SKIP: {
skip "locale $locale is not present", 4 unless (any { $_ eq $locale } @all_locales);
opustags(qw(gobble.opus -a TITLE=七面鳥 -a ARTIST=éàç -o out.opus -y));
$ENV{LC_ALL} = 'fr_FR.ISO-8859-1';
local $ENV{LC_ALL} = $locale;
is_deeply(opustags(qw(-S out.opus), {in => <<"END_IN", mode => ':raw'}), [<<"END_OUT", '', 0], 'set all in ISO-8859-1');
T=\xef\xef\xf6
@ -242,3 +249,4 @@ TITLE=七面鳥
ARTIST=éàç
I=ùÎ
END_OUT
}