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> (cherry picked from commitca9a1b76d8) Signed-off-by: Martin Renvoize <martin.renvoize@ptfs-europe.com> (cherry picked from commit882e18500c) Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
parent
0b3b849815
commit
8617db86e6
|
|
@ -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…
Reference in New Issue