From eb9ec4acd05752a970cf5395a3c78b35236e02da Mon Sep 17 00:00:00 2001
From: Christopher Baines <mail@cbaines.net>
Date: Thu, 20 Nov 2025 14:09:40 +0000
Subject: [PATCH] Handle unknown resource pool stats

---
 guix-data-service/web/controller.scm | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/guix-data-service/web/controller.scm b/guix-data-service/web/controller.scm
index 5fe9c1d..bfdbd18 100644
--- a/guix-data-service/web/controller.scm
+++ b/guix-data-service/web/controller.scm
@@ -347,11 +347,13 @@
             (for-each
              (match-lambda
                ((stat . value)
-                (metric-set
-                 (assq-ref resource-pool-metrics stat)
-                 value
-                 #:label-values
-                 `((pool_name . ,name)))))
+                (and=> (assq-ref resource-pool-metrics stat)
+                       (lambda (metric)
+                         (metric-set
+                          metric
+                          value
+                          #:label-values
+                          `((pool_name . ,name)))))))
              (with-exception-handler
                  (lambda (exn)
                    (simple-format