From fc6105a5e7d1e3a07bf07ea85e7902dd8e9fc849 Mon Sep 17 00:00:00 2001 From: tv Date: Tue, 17 May 2022 23:37:36 +0200 Subject: query term size before start scanning This works around an issue causing the pager to hang when there is input before the terminal size could be determined. The root cause has yet to be found. --- src/main.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src') 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 -- cgit v1.2.3