mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-05-19 03:20:21 -07:00
Prompt: haddock fixes
This commit is contained in:
parent
3d39b52959
commit
2a3ac53d30
@ -68,8 +68,6 @@ import System.Posix.Files
|
|||||||
-- TODO:
|
-- TODO:
|
||||||
--
|
--
|
||||||
-- * scrolling the completions that don't fit in the window (?)
|
-- * scrolling the completions that don't fit in the window (?)
|
||||||
--
|
|
||||||
-- * commands to edit the command line
|
|
||||||
|
|
||||||
type XP = StateT XPState IO
|
type XP = StateT XPState IO
|
||||||
|
|
||||||
@ -312,7 +310,7 @@ killAfter :: XP ()
|
|||||||
killAfter =
|
killAfter =
|
||||||
modify $ \s -> s { command = take (offset s) (command s) }
|
modify $ \s -> s { command = take (offset s) (command s) }
|
||||||
|
|
||||||
-- | Kill the next/previous word
|
-- | Kill the next\/previous word
|
||||||
killWord :: Direction -> XP ()
|
killWord :: Direction -> XP ()
|
||||||
killWord d = do
|
killWord d = do
|
||||||
XPS { command = c, offset = o } <- get
|
XPS { command = c, offset = o } <- get
|
||||||
|
Loading…
x
Reference in New Issue
Block a user