about summary refs log tree commit diff
path: root/arunisaac
diff options
context:
space:
mode:
Diffstat (limited to 'arunisaac')
-rw-r--r--arunisaac/prometheus.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/arunisaac/prometheus.scm b/arunisaac/prometheus.scm
index 9f2cef1..705706e 100644
--- a/arunisaac/prometheus.scm
+++ b/arunisaac/prometheus.scm
@@ -163,7 +163,12 @@ alongside optional key-value pairs called labels.")
                                     #~(cons (cons "targets" (vector #$@targets))
                                             #$(match labels
                                                 (() #~'())
-                                                (_ #~(cons "labels" #$label)))))
+                                                (_
+                                                 #~(list (cons "labels"
+                                                               (list #$@(map (match-lambda
+                                                                               ((key . value)
+                                                                                #~(cons #$key #$value)))
+                                                                             labels))))))))
                                   static-configs))))))
 
 (define prometheus-config-file-gexp