aboutsummaryrefslogtreecommitdiff
path: root/nar-herder
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2023-09-11 12:48:29 +0100
committerChristopher Baines <mail@cbaines.net>2023-09-12 13:11:00 +0100
commitc16ccd3b204b6da525000f6e934e744bedfa3f7c (patch)
treee26f434638be77e2d7e3035381c5939ffad707e1 /nar-herder
parent8dff41c21ac4cc42f513da07e368ecc4e6a22dff (diff)
downloadnar-herder-c16ccd3b204b6da525000f6e934e744bedfa3f7c.tar
nar-herder-c16ccd3b204b6da525000f6e934e744bedfa3f7c.tar.gz
Sleep on exceptions in the recent change removal fiber
Diffstat (limited to 'nar-herder')
-rw-r--r--nar-herder/recent-changes.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/nar-herder/recent-changes.scm b/nar-herder/recent-changes.scm
index 558c1bb..bedacfc 100644
--- a/nar-herder/recent-changes.scm
+++ b/nar-herder/recent-changes.scm
@@ -57,7 +57,8 @@
(simple-format
(current-error-port)
"exception in recent change removal thread: ~A\n"
- exn))
+ exn)
+ (sleep 120))
(lambda ()
(let ((recent-changes-id-for-deletion
(database-get-recent-changes-id-for-deletion database