summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorTom Smeding <tom@tomsmeding.com>2026-06-28 13:09:52 +0200
committerTom Smeding <tom@tomsmeding.com>2026-06-28 13:09:52 +0200
commit43bba6e5f373e3da5403eeb0488e1d11e7bbee72 (patch)
tree8135e2c691a52b19058226a575c9cd387c802218 /src
parent31f2e0ca24318de69f0ab3d04a573901b4fd5acc (diff)
Less prints
Diffstat (limited to 'src')
-rw-r--r--src/Index.hs2
1 files changed, 1 insertions, 1 deletions
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 []