twin/xmonad-contrib
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad-contrib.git synced 2025-08-14 03:35:54 -07:00
Code Issues Packages Projects Releases Wiki Activity

some code formatting

Browse Source
This commit is contained in:
Andrea Rossato
2008-02-17 12:44:34 +00:00
parent 6a026cf692
commit 72806ee75c
2 changed files with 10 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
XMonad/Prompt.hs
View File

@@ -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)

4
XMonad/Prompt/Shell.hs
View File

@@ -12,8 +12,8 @@
--
-----------------------------------------------------------------------------
module XMonad.Prompt.Shell(
-- * Usage
module XMonad.Prompt.Shell
( -- * Usage
-- $usage
shellPrompt
, getShellCompl