about summary refs log tree commit homepage
path: root/lib/PublicInbox/Search.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/PublicInbox/Search.pm')
-rw-r--r--lib/PublicInbox/Search.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/PublicInbox/Search.pm b/lib/PublicInbox/Search.pm
index 5fc7682c..de296e1a 100644
--- a/lib/PublicInbox/Search.pm
+++ b/lib/PublicInbox/Search.pm
@@ -215,18 +215,20 @@ sub get_thread {
 sub retry_reopen {
         my ($self, $cb) = @_;
         my $ret;
-        for (1..10) {
+        for my $i (1..10) {
                 eval { $ret = $cb->() };
                 return $ret unless $@;
                 # Exception: The revision being read has been discarded -
                 # you should call Xapian::Database::reopen()
                 if (ref($@) eq 'Search::Xapian::DatabaseModifiedError') {
+                        warn "reopen try #$i on $@\n";
                         reopen($self);
                 } else {
                         warn "ref: ", ref($@), "\n";
                         die;
                 }
         }
+        die "Too many Xapian database modifications in progress\n";
 }
 
 sub _do_enquire {