Skip to content

Commit

Permalink
Rename keep-exact-matches-in-suggestions to delete-inexact-matches.
Browse files Browse the repository at this point in the history
  • Loading branch information
Ambrevar committed Dec 11, 2020
1 parent bb2ee1d commit 8ddf574
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 3 deletions.
4 changes: 2 additions & 2 deletions libraries/minibuffer/filter-preprocessor.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -27,8 +27,8 @@ The substrings must be SUBSTRING-LENGTH characters long or more."
(string-downcase result)
result)))

(export-always 'keep-exact-matches-in-suggestions)
(defun keep-exact-matches-in-suggestions (suggestions source input)
(export-always 'delete-inexact-matches)
(defun delete-inexact-matches (suggestions source input)
"Destructively filter out non-exact matches from SUGGESTIONS.
Return the resulting list.
If any input substring matches exactly (but not necessarily a whole word),
Expand Down
2 changes: 1 addition & 1 deletion libraries/minibuffer/minibuffer-source.lisp
Original file line number Diff line number Diff line change
Expand Up @@ -113,7 +113,7 @@ display and match against, see `active-properties'.")
:documentation
"Takes `input' and filters the suggestions.")

(filter-preprocessor #'keep-exact-matches-in-suggestions
(filter-preprocessor #'delete-inexact-matches
:type (or null function)
:documentation
"Function called over a copy of `initial-suggestions', when
Expand Down

0 comments on commit 8ddf574

Please sign in to comment.