diff options
Diffstat (limited to 'XMonad/Prompt.hs')
| -rw-r--r-- | XMonad/Prompt.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Prompt.hs b/XMonad/Prompt.hs index 459481d..74dbfe7 100644 --- a/XMonad/Prompt.hs +++ b/XMonad/Prompt.hs @@ -286,7 +286,7 @@ completionHandle c (ks,_) (KeyEvent {ev_event_type = t}) case c of [] -> do updateWindows eventLoop handle - l -> do let new_command = nextCompletion (xptype st) (command st) l --newCommand (command st) l + l -> do let new_command = nextCompletion (xptype st) (command st) l modify $ \s -> s { command = new_command, offset = length new_command } redrawWindows c eventLoop (completionHandle c) |