summaryrefslogtreecommitdiffstats
path: root/Main.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Main.hs')
-rw-r--r--Main.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Main.hs b/Main.hs
index de1b979..aaa4970 100644
--- a/Main.hs
+++ b/Main.hs
@@ -94,7 +94,7 @@ main = do
, w <- W.integrate (W.stack wk) ]
mapM_ manage ws -- find new windows
- when logging $ withWindowSet (io . hPrint stdout)
+ when logging $ withWindowSet (io . putStrLn . serial)
-- main loop, for all you HOF/recursion fans out there.
forever $ handle =<< io (nextEvent dpy e >> getEvent e)