Commit6d5786e7Recorded24 Oct 2026Repositoryfolio

Check committed search results alongside status and backlinks

Changed
 test/test-http-read-index.sgl | 19 ++++++++++++++-----
 1 file changed, 14 insertions(+), 5 deletions(-)
Diff
test/test-http-read-index.sglmodified
@@ -45,15 +45,24 @@
45
"2099-12-31" "a"))
46
(assert-true (sqlite-run (folio-index-db writer)
47
"DELETE FROM note_links WHERE target = ?" "b"))
−48
(assert-true (string-contains?
−49
(call-tool server "folio/status" (dict))
−50
"## Recent Notes\n\n b\n a"))
−51
(assert-true (string-contains?
−52
(call-tool server "folio/note-links" (dict name: "b")) "← a"))))
+48
(let ((recent? (string-contains?
+49
(call-tool server "folio/status" (dict))
+50
"## Recent Notes\n\n b\n a"))
+51
(backlink? (string-contains?
+52
(call-tool server "folio/note-links" (dict name: "b")) "← a"))
+53
(search? (equal? "No notes found."
+54
(call-tool server "folio/notes" (dict since: "2099-01-01")))))
+55
(display (format "READ isolation committed-recent=~a committed-backlink=~a committed-search=~a\n"
+56
recent? backlink? search?))
+57
(assert-true recent?)
+58
(assert-true backlink?)
+59
(assert-true search?))))
60
(assert-true (string-contains?
61
(call-tool server "folio/status" (dict))
62
"## Recent Notes\n\n a\n b"))
63
(assert-false (string-contains?
64
(call-tool server "folio/note-links" (dict name: "b")) "← a"))
+65
(assert-true (string-contains?
+66
(call-tool server "folio/notes" (dict since: "2099-01-01")) " a"))
67
(sqlite-close (folio-index-db reader))
68
(sqlite-close (folio-index-db writer))))))))