From 16133771a31bcbd396f24583054a618bb21e5e57 Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Sat, 5 Oct 2024 08:30:11 +0100
Subject: Fix deleting recent changes

---
 nar-herder/database.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/nar-herder/database.scm b/nar-herder/database.scm
index e170d64..e69eabb 100644
--- a/nar-herder/database.scm
+++ b/nar-herder/database.scm
@@ -1139,7 +1139,7 @@ DELETE FROM recent_changes WHERE id < :id"
         statement
         #:id id)
 
-       (sqlite-step statement)
+       (sqlite-fold (const #f) #f statement)
        (sqlite-reset statement)
 
        (changes db)))))
-- 
cgit v1.2.3