[perl-DBD-SQLite] New 1.31 sources and FTS3 test patch

[Petr Sabata]

commit 08f3e91eb665a25849228a52ca1549bb16f9a38a
Author: Petr Sabata <psabata at redhat.com>
Date:   Thu Sep 16 10:59:33 2010 +0200

    New 1.31 sources and FTS3 test patch

 .gitignore                           |    1 +
 perl-DBD-SQLite-1.31-fts3-test.patch |   24 ++++++++++++++++++++++++
 sources                              |    2 +-
 3 files changed, 26 insertions(+), 1 deletions(-)
---
diff --git a/.gitignore b/.gitignore
index e3827c6..f2c6be4 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1 +1,2 @@
 DBD-SQLite-1.29.tar.gz
+/DBD-SQLite-1.31.tar.gz
diff --git a/perl-DBD-SQLite-1.31-fts3-test.patch b/perl-DBD-SQLite-1.31-fts3-test.patch
new file mode 100644
index 0000000..dd538a8
--- /dev/null
+++ b/perl-DBD-SQLite-1.31-fts3-test.patch
@@ -0,0 +1,24 @@
+--- DBD-SQLite-1.31/t/43_fts3.t	2010-09-15 08:16:43.000000000 +0100
++++ DBD-SQLite-1.31/t/43_fts3.t	2010-09-15 14:50:58.529161202 +0100
+@@ -90,6 +90,11 @@
+   }
+ 
+   # queries
++SKIP: {
++  skip "These tests require SQLite compiled with ENABLE_FTS3_PARENTHESIS option", scalar @tests
++    unless DBD::SQLite->can('compile_options') &&
++    grep /ENABLE_FTS3_PARENTHESIS/, DBD::SQLite::compile_options();
++
+   my $sql = "SELECT docid FROM try_fts3 WHERE content MATCH ?";
+   for my $t (@tests) {
+     my ($query, @expected) = @$t;
+@@ -97,6 +102,9 @@
+     my $results = $dbh->selectcol_arrayref($sql, undef, $query);
+     is_deeply($results, \@expected, "$query (unicode is $use_unicode)");
+   }
++
++}
++
+ }
+ 
+ 
diff --git a/sources b/sources
index 289456d..21225c7 100644
--- a/sources
+++ b/sources
@@ -1 +1 @@
-2a47cea6ecff62508775d90151a8030f  DBD-SQLite-1.29.tar.gz
+67b3575104efd606c8093bc416e3338d  DBD-SQLite-1.31.tar.gz