1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 14:19:10 -04:00

skip unless Search::Tokenizer is not installed

This commit is contained in:
Kenichi Ishigaki 2010-07-14 18:46:18 +00:00
parent 3b3a5e83bc
commit 1422eb5427

View file

@ -30,6 +30,10 @@ BEGIN {
if ($] < 5.008005) {
plan skip_all => 'Unicode is not supported before 5.8.5';
}
eval "require Search::Tokenizer";
if ($@) {
plan skip_all => 'this test requires Search::Tokenizer';
}
}
use Test::NoWarnings;
@ -75,7 +79,6 @@ for my $use_unicode (0, 1) {
my $dbh = connect_ok( RaiseError => 1, sqlite_unicode => $use_unicode );
# create fts3 table
use Search::Tokenizer;
$dbh->do(<<"") or die DBI::errstr;
CREATE VIRTUAL TABLE try_fts3
USING fts3(content, tokenize=perl 'main::locale_tokenizer')