From 43bba6e5f373e3da5403eeb0488e1d11e7bbee72 Mon Sep 17 00:00:00 2001 From: Tom Smeding Date: Sun, 28 Jun 2026 12:09:52 +0100 Subject: Less prints --- src/Index.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Index.hs b/src/Index.hs index 3703f65..4b852bf 100644 --- a/src/Index.hs +++ b/src/Index.hs @@ -333,7 +333,7 @@ indexUpdateImport index@(Index _ mp _) chan = do -- but parsing the events happens lazily. indexGetEventsLinear :: Index -> Channel -> CountKind -> Int -> Int -> IO [(YMDHMS, EventID, Event)] indexGetEventsLinear index@(Index _ mp _) chan kind from count = do - atomicPrintS $ "indexGetEventsLinear " ++ show chan ++ " " ++ show kind ++ " " ++ show from ++ " " ++ show count + -- atomicPrintS $ "indexGetEventsLinear " ++ show chan ++ " " ++ show kind ++ " " ++ show from ++ " " ++ show count ci <- readIORef (mp Map.! chan) if from + count < 0 || from >= getCount kind (ciTotal ci) then return [] -- cgit v1.3.1