mirror of
https://github.com/xmonad/xmonad.git
synced 2025-07-25 09:11:52 -07:00
avoid name class with forever in 6.8
This commit is contained in:
4
Main.hs
4
Main.hs
@@ -101,9 +101,9 @@ main = do
|
||||
mapM_ manage ws
|
||||
|
||||
-- main loop, for all you HOF/recursion fans out there.
|
||||
forever $ handle =<< io (nextEvent dpy e >> getEvent e)
|
||||
forever_ $ handle =<< io (nextEvent dpy e >> getEvent e)
|
||||
|
||||
where forever a = a >> forever a
|
||||
where forever_ a = a >> forever_ a
|
||||
|
||||
-- ---------------------------------------------------------------------
|
||||
-- IO stuff. Doesn't require any X state
|
||||
|
Reference in New Issue
Block a user