From 1422eb54273d05a2c4237609b4a37768bdc92f0e Mon Sep 17 00:00:00 2001 From: Kenichi Ishigaki Date: Wed, 14 Jul 2010 18:46:18 +0000 Subject: [PATCH] skip unless Search::Tokenizer is not installed --- t/43_fts3.t | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/t/43_fts3.t b/t/43_fts3.t index 8c13af2..5040478 100644 --- a/t/43_fts3.t +++ b/t/43_fts3.t @@ -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')