twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-05-19 03:20:21 -07:00
Code Issues Packages Projects Releases Wiki Activity

X.P.FuzzyMatch: Use isSubsequenceOf

Browse Source 
The implementation is exactly the same, just that this function is now
in base, so there should be no change in behaviour.
This commit is contained in:
slotThe 2022-01-30 10:08:02 +01:00
parent 56cc296754
commit c36a888a59
1 changed files with 1 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
XMonad/Prompt/FuzzyMatch.hs
View File

@ -68,10 +68,7 @@ import qualified Data.List.NonEmpty as NE
-- | Returns True if the first argument is a subsequence of the second argument,
-- that is, it can be obtained from the second sequence by deleting elements.
fuzzyMatch :: String -> String -> Bool
fuzzyMatch [] _ = True
fuzzyMatch _ [] = False
fuzzyMatch xxs@(x:xs) (y:ys) | toLower x == toLower y = fuzzyMatch xs ys
| otherwise = fuzzyMatch xxs ys
fuzzyMatch a b = isSubsequenceOf (map toLower a) (map toLower b)
-- | Sort the given set of strings by how well they match. Match quality is
-- measured first by the length of the substring containing the match and second