diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/main.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/main.hs b/src/main.hs index 816aa7c..4b78f49 100644 --- a/src/main.hs +++ b/src/main.hs @@ -247,14 +247,14 @@ main = do installHandlers signalHandlers + winchHandler i putEvent + threadIds <- mapM forkIO [ forever $ scan i >>= putEvent . EScan ] - winchHandler i putEvent - result <- run o getEvent q1 mapM_ killThread threadIds |