twin/xmonad
1
0
Fork 0
mirror of https://github.com/xmonad/xmonad.git synced 2025-05-19 08:30:21 -07:00
Code Issues Packages Projects Releases Wiki Activity

avoid name class with forever in 6.8

Browse Source
This commit is contained in:
Don Stewart 2007-10-06 10:35:30 +00:00
parent 6294e6adf5
commit 053f1adb7c
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Main.hs
View File

@ -101,9 +101,9 @@ main = do
mapM_ manage ws mapM_ manage ws
-- main loop, for all you HOF/recursion fans out there. -- 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 -- IO stuff. Doesn't require any X state