summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoman Smrž <roman.smrz@seznam.cz>2025-07-07 22:36:24 +0200
committerRoman Smrž <roman.smrz@seznam.cz>2025-07-07 22:36:24 +0200
commit6105313270ea1e99651a65c56f597b271d5c3d01 (patch)
treebd6524798e249bbc29724f725aceda22768cf987
parentb4b706293734d890bf9ef24d5b5c27c4f80faad6 (diff)
Fix accumulating PREV references in local state
-rw-r--r--src/Erebos/State.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Erebos/State.hs b/src/Erebos/State.hs
index 076a8c0..7cd82de 100644
--- a/src/Erebos/State.hs
+++ b/src/Erebos/State.hs
@@ -66,7 +66,7 @@ instance Storable LocalState where
lsPrev <- loadMbRawWeak "PREV"
lsIdentity <- loadRef "id"
lsShared <- loadRefs "shared"
- lsOther <- filter ((`notElem` [ BC.pack "id", BC.pack "shared" ]) . fst) <$> loadRecItems
+ lsOther <- filter ((`notElem` [ BC.pack "PREV", BC.pack "id", BC.pack "shared" ]) . fst) <$> loadRecItems
return LocalState {..}
instance HeadType LocalState where