cage/tinmop
1
0
Fork 0
mirror of https://codeberg.org/cage/tinmop/ synced 2025-02-17 08:10:36 +01:00
Code Issues

- fixed 'complete-uri-matcher', does not take into account string case difference anymore.

Browse Source
This commit is contained in:
cage 2022-09-11 13:23:06 +02:00
parent 90c4af648b
commit 9e88fe0e6f
1 changed files with 2 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/complete.lisp
View File

@ -196,6 +196,7 @@ list af all possible candidtae for completion."
do
(when-let ((indices-matched (cl-i18n-utils:fuzzy-match template
candidate
:char-comparison-fn #'char-equal
:similarity-match 5
:similarity-mismatch -5
:penalty-weight 1)))
@ -213,14 +214,8 @@ list af all possible candidtae for completion."
(non-nulls-a (- length-a nulls-a))
(non-nulls-b (- length-b nulls-b)))
(cond
((and (= length-a (length template))
(= nulls-a 0))
t)
((and (= length-b (length template))
(= nulls-b 0))
nil)
((= length-a length-b)
(< nulls-a nulls-b))
(> non-nulls-a non-nulls-b))
((= non-nulls-a non-nulls-b)
(> length-a length-b))
(t