aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--nar-herder/server.scm11
1 files changed, 6 insertions, 5 deletions
diff --git a/nar-herder/server.scm b/nar-herder/server.scm
index fecf166..a714fb3 100644
--- a/nar-herder/server.scm
+++ b/nar-herder/server.scm
@@ -754,10 +754,11 @@
(run-fibers
(lambda ()
- (initialise-storage-metrics
- database
- canonical-storage
- metrics-registry)
+ (when canonical-storage
+ (initialise-storage-metrics
+ database
+ canonical-storage
+ metrics-registry))
(start-recent-change-removal-and-database-dump-fiber
database
@@ -776,7 +777,7 @@
(start-fetch-changes-fiber
database
metrics-registry
- canonical-storage
+ canonical-storage ; might be #f, but that's fine here
mirror
cached-compression-management-channel)