File perl-Search-Xapian-1.0.4_thread_testsuite.patch of Package perl-Search-Xapian

Index: t/thread.t
===================================================================
--- t/thread.t.orig
+++ t/thread.t
@@ -140,7 +140,7 @@ is( ref($posit), 'Search::Xapian::Positi
 
 ok( $termit = $db->termlist_begin(1), 'create TermIterator' );
 is( ref($termit), 'Search::Xapian::TermIterator', 'check TermIterator' );
-
+$doc->values_count();
 ok( $valueit = $doc->values_begin(), 'create ValueIterator' );
 is( $valueit->get_valueno(), 0, 'check ValueIterator' );