require ASCII digits for local FS items

In case some BOFH decides to randomly create directories
using non-ASCII digits all over the place.

1 files changed, 1 insertions, 1 deletions

diff --git a/lib/PublicInbox/Search.pm b/lib/PublicInbox/Search.pm
index c054a874..9903f427 100644
--- a/lib/PublicInbox/Search.pm
+++ b/lib/PublicInbox/Search.pm
@@ -144,7 +144,7 @@ sub _xdb ($) {
         my $qpf = \($self->{qp_flags} ||= $QP_FLAGS);
         if ($self->{version} >= 2) {
                 foreach my $part (<$dir/*>) {
-                        -d $part && $part =~ m!/\d+\z! or next;
+                        -d $part && $part =~ m!/[0-9]+\z! or next;
                         my $sub = Search::Xapian::Database->new($part);
                         if ($xdb) {
                                 $xdb->add_database($sub);