mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-08-26 00:53:47 -07:00
Prompt.hs: tweak haddocks
This commit is contained in:
@@ -808,8 +808,8 @@ breakAtSpace s
|
|||||||
(s1',s2') = breakAtSpace $ tail s2
|
(s1',s2') = breakAtSpace $ tail s2
|
||||||
|
|
||||||
-- | 'historyCompletion' provides a canned completion function much like
|
-- | 'historyCompletion' provides a canned completion function much like
|
||||||
-- getShellCompl; you pass it to mkXPrompt, and it will make completions work
|
-- 'getShellCompl'; you pass it to mkXPrompt, and it will make completions work
|
||||||
-- from the query history stored in ~/.xmonad/history.
|
-- from the query history stored in ~\/.xmonad\/history.
|
||||||
historyCompletion :: ComplFunction
|
historyCompletion :: ComplFunction
|
||||||
historyCompletion x = fmap (filter (isInfixOf x) . Map.fold (++) []) readHistory
|
historyCompletion x = fmap (filter (isInfixOf x) . Map.fold (++) []) readHistory
|
||||||
|
|
||||||
@@ -820,7 +820,7 @@ uniqSort = toList . fromList
|
|||||||
|
|
||||||
-- | Functions to be used with the 'historyFilter' setting.
|
-- | Functions to be used with the 'historyFilter' setting.
|
||||||
-- 'deleteAllDuplicates' will remove all duplicate entries.
|
-- 'deleteAllDuplicates' will remove all duplicate entries.
|
||||||
-- 'deleteConsecutiveDuplicates' will remove duplicate elements which are
|
-- 'deleteConsecutiveDuplicates' will only remove duplicate elements
|
||||||
-- immediately next to each other.
|
-- immediately next to each other.
|
||||||
deleteAllDuplicates, deleteConsecutiveDuplicates :: [String] -> [String]
|
deleteAllDuplicates, deleteConsecutiveDuplicates :: [String] -> [String]
|
||||||
deleteAllDuplicates = nub
|
deleteAllDuplicates = nub
|
||||||
|
Reference in New Issue
Block a user