Enable FuzzyMatch
This commit is contained in:
parent
591521b585
commit
57782266e2
3 changed files with 10 additions and 1 deletions
|
@ -18,6 +18,7 @@ import XMonad.Layout.ToggleLayouts
|
||||||
import XMonad.Operations
|
import XMonad.Operations
|
||||||
import XMonad.Prompt
|
import XMonad.Prompt
|
||||||
import XMonad.Prompt.ConfirmPrompt
|
import XMonad.Prompt.ConfirmPrompt
|
||||||
|
import XMonad.Prompt.FuzzyMatch
|
||||||
import XMonad.Prompt.Shell
|
import XMonad.Prompt.Shell
|
||||||
import XMonad.Util.EZConfig
|
import XMonad.Util.EZConfig
|
||||||
import XMonad.Util.NamedScratchpad
|
import XMonad.Util.NamedScratchpad
|
||||||
|
@ -98,6 +99,9 @@ promptConfig = def
|
||||||
, font = "xft:Iosevka Samae:style=Regular:size=8:charwidth=5"
|
, font = "xft:Iosevka Samae:style=Regular:size=8:charwidth=5"
|
||||||
, height = 24
|
, height = 24
|
||||||
, promptBorderWidth = 5
|
, promptBorderWidth = 5
|
||||||
|
-- Fuzzysearch by default
|
||||||
|
, searchPredicate = fuzzyMatch
|
||||||
|
, sorter = fuzzySort
|
||||||
}
|
}
|
||||||
|
|
||||||
-- -- Slightly taken from
|
-- -- Slightly taken from
|
||||||
|
|
|
@ -53,7 +53,7 @@ mkPassPrompt label f conf = do
|
||||||
passComplFun :: [String] -> String -> IO [String]
|
passComplFun :: [String] -> String -> IO [String]
|
||||||
passComplFun allPasses input = pure $
|
passComplFun allPasses input = pure $
|
||||||
sortBy (compare `on` levenshtein input)
|
sortBy (compare `on` levenshtein input)
|
||||||
. take 5
|
. take 10
|
||||||
. filter (consumes input)
|
. filter (consumes input)
|
||||||
$ allPasses
|
$ allPasses
|
||||||
where
|
where
|
||||||
|
|
|
@ -47,6 +47,11 @@ projects =
|
||||||
, projectStartHook = Just $ do spawnGuiTextEditor
|
, projectStartHook = Just $ do spawnGuiTextEditor
|
||||||
safeSpawnProg term
|
safeSpawnProg term
|
||||||
}
|
}
|
||||||
|
, Project { projectName = "nixpkgs"
|
||||||
|
, projectDirectory = "~/admin/nixpkgs"
|
||||||
|
, projectStartHook = Just $ do spawnGuiTextEditor
|
||||||
|
safeSpawnProg term
|
||||||
|
}
|
||||||
, Project { projectName = "overlays-personal"
|
, Project { projectName = "overlays-personal"
|
||||||
, projectDirectory = "~/admin/overlays-personal"
|
, projectDirectory = "~/admin/overlays-personal"
|
||||||
, projectStartHook = Just $ do spawnGuiTextEditor
|
, projectStartHook = Just $ do spawnGuiTextEditor
|
||||||
|
|
Loading…
Reference in a new issue