clone/logseq
1
0
Fork 0
mirror of https://github.com/logseq/logseq.git synced 2026-05-05 19:36:35 +00:00
Code Issues Packages Projects Releases Wiki Activity

feat(full-text-search): use flexsearch instead of fuzzysort

Browse Source 
For full-text search.
This commit is contained in:
Tienson Qin
2021-02-10 19:43:18 +08:00
parent e1ae3bfa90
commit 42f053d89c
7 changed files with 104 additions and 47 deletions
Download Patch File Download Diff File Expand all files Collapse all files

37
src/main/frontend/components/search.cljs
View File

@@ -31,6 +31,41 @@
(let [switch (reductions not= true (map pred? coll (rest coll)))]
(map (partial map first) (partition-by second (map list coll switch)))))
(defn highlight-exact-query
[content q]
(let [q-words (string/split q #" ")
lc-content (string/lower-case content)
lc-q (string/lower-case q)]
(if (or (string/includes? lc-content lc-q)
(not (re-find #" " q)))
(let [i (string/index-of lc-content lc-q)
[before after] [(subs content 0 i) (subs content (+ i (count q)))]]
[:p
(when-not (string/blank? before)
[:span before])
[:mark (subs content i (+ i (count q)))]
(when-not (string/blank? after)
[:span after])])
(let [elements (loop [words q-words
content content
result []]
(if (and (seq words) content)
(let [word (first words)
lc-word (string/lower-case word)
lc-content (string/lower-case content)]
(if-let [i (string/index-of lc-content lc-word)]
(recur (rest words)
(subs content (+ i (count word)))
(vec
(concat result
[[:span (subs content 0 i)]
[:mark (subs content i (+ i (count word)))]])))
(recur nil
content
result)))
(conj result [:span content])))]
[:p elements]))))
(rum/defc highlight-fuzzy
[content indexes]
(let [n (count content)
@@ -182,7 +217,7 @@
(:page/name page))]
[:div.flex-1
[:div.text-sm.font-medium (str "-> " page)]
(highlight-fuzzy content indexes)])
(highlight-exact-query content search-q)])
nil))})])))