#!/usr/bin/perl -w
use strict;
use Test::More;
use utf8;
eval "use Text::Unaccent::PurePerl";
if ($@) {
plan skip_all => "Text::Unaccent::PurePerl required for testing accent changes";
}
else {
plan tests => 1;
}
use Music::Tag;
my $tag = Music::Tag->new('t/fake.music',
{ 'Unaccent' => 1 },
"Generic"
);
ok ( $tag->plugin('Generic')->simple_compare('Björk', 'Bjork'), 'Accent compare');