summaryrefslogtreecommitdiff
path: root/tests/xapian.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/xapian.scm')
-rw-r--r--tests/xapian.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/tests/xapian.scm b/tests/xapian.scm
index 73827b2..f754b56 100644
--- a/tests/xapian.scm
+++ b/tests/xapian.scm
@@ -87,7 +87,7 @@
(lambda () #t)
(lambda ()
(test-equal "search: finds simple strings"
- '("33299")
+ '("33299" "47187")
(search "hello" #:pagesize 2))
(test-equal "search: supports submitter prefix with partial name"
'("26095")
@@ -104,6 +104,10 @@
(test-equal "search: finds by message id"
'("33299")
(search "msgid:c78be403-0616-67a0-fd5a-e1196b6a14d1@example.com"
+ #:pagesize 2))
+ (test-equal "search: finds by long message id"
+ '("47187")
+ (search "msgid:X0AJfvGmJvZOXkqcxiL1wDpQGbPYwaMG5V24ltJiXsvMhc8i8OZkWd_uAf18tMpgcSq1izVJTiurVFRaflG2_dOtTi7UzrOZwT9DcV0gFo0=@protonmail.com"
#:pagesize 2)))
(lambda ()
(delete-file-recursively db-dir))))