Browse Source

Bug 18959: Skip xt/author/Text_CSV_Various.t if Text::CSV::Unicode missing

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
18.11.x
Tomas Cohen Arazi 3 years ago
committed by Nick Clemens
parent
commit
ca9a1b76d8
  1. 20
      xt/author/Text_CSV_Various.t

20
xt/author/Text_CSV_Various.t

@ -22,16 +22,24 @@
use Modern::Perl;
use Test::More tests => 32;
use Test::More;
use Test::Warn;
use Text::CSV;
use Text::CSV_XS;
use Module::Load::Conditional qw/check_install/;
BEGIN {
use FindBin;
use lib $FindBin::Bin;
use_ok('Text::CSV');
use_ok('Text::CSV_XS');
use_ok('Text::CSV::Unicode');
if ( check_install( module => 'Text::CSV::Unicode' ) ) {
plan tests => 29;
} else {
plan skip_all => "Need Text::CSV::Unicode"
}
}
use Text::CSV::Unicode;
sub pretty_line {
my $max = 54;
(@_) or return "#" x $max . "\n";

Loading…
Cancel
Save