twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-07-31 12:11:52 -07:00
Code Issues Packages Projects Releases Wiki Activity

Apply hlint 3.3 hints

Browse Source
This commit is contained in:
Tomas Janousek
2021-11-04 20:39:39 +00:00
parent e7f102bc9a
commit 5aff766a4c
20 changed files with 32 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
XMonad/Prompt.hs
View File

@@ -271,7 +271,7 @@ class XPrompt t where
-- The argument passed to this function is given by `commandToComplete`
-- The default implementation shows an error message.
completionFunction :: t -> ComplFunction
completionFunction t = \_ -> return ["Completions for " ++ showXPrompt t ++ " could not be loaded"]
completionFunction t = const $ return ["Completions for " ++ showXPrompt t ++ " could not be loaded"]
-- | When the prompt has multiple modes (created with mkXPromptWithModes), this function is called
-- when the user picks an item from the autocompletion list.
@@ -748,7 +748,7 @@ handleCompletion cs = do
alwaysHlight <- gets $ alwaysHighlight . config
st <- get
let updateWins l = redrawWindows (pure ()) l
let updateWins = redrawWindows (pure ())
updateState l = if alwaysHlight
then hlComplete (getLastWord $ command st) l st
else simpleComplete l st