From 60162f30f37934df1c55eff2769daa84c42875de Mon Sep 17 00:00:00 2001
From: crumbtoo <crumb@disroot.org>
Date: Wed, 29 Nov 2023 11:39:01 -0700
Subject: [PATCH] length

---
 src/TIM.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/TIM.hs b/src/TIM.hs
index ecc8133..e05adaa 100644
--- a/src/TIM.hs
+++ b/src/TIM.hs
@@ -483,7 +483,7 @@ doAdmin = doStats
 
 -- | is the heap larger than some arbitrary number i declared "bloated"?
 isHeapLarge :: TiState -> Bool
-isHeapLarge st = hSize (st ^. tiHeap) >= triggerSize
+isHeapLarge st = length (st ^. tiHeap) >= triggerSize
     where triggerSize = 50
 
 ----------------------------------------------------------------------------------