diff options
author | Eric Wong <e@80x24.org> | 2021-10-31 09:26:58 +0000 |
---|---|---|
committer | Eric Wong <e@80x24.org> | 2021-10-31 17:37:31 +0000 |
commit | 27015c3365fd069013e58c6cc06e7be38f4fbe4f (patch) | |
tree | 5fe0cbb9ed089e5b89b3e5ed527d466e04295b9b /lib/PublicInbox | |
parent | 3702b79a2d469f9ba8fa7e4d18502f6b2fba50e3 (diff) | |
download | public-inbox-27015c3365fd069013e58c6cc06e7be38f4fbe4f.tar.gz |
Xapian boolean terms rely on upper-case prefixes, so the terms themselves need to be all lowercase.
Diffstat (limited to 'lib/PublicInbox')
-rw-r--r-- | lib/PublicInbox/LeiInput.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/PublicInbox/LeiInput.pm b/lib/PublicInbox/LeiInput.pm index 84fc579d..a1dcc907 100644 --- a/lib/PublicInbox/LeiInput.pm +++ b/lib/PublicInbox/LeiInput.pm @@ -30,7 +30,7 @@ my %ERR = ( my ($label) = @_; length($label) >= $L_MAX and return "`$label' too long (must be <= $L_MAX)"; - $label =~ m{\A[a-z0-9_](?:[a-z0-9_\-\./\@,]*[a-z0-9])?\z}i ? + $label =~ m{\A[a-z0-9_](?:[a-z0-9_\-\./\@,]*[a-z0-9])?\z} ? undef : "`$label' is invalid"; }, kw => sub { |