diff options
| -rw-r--r-- | nar-herder/server.scm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/nar-herder/server.scm b/nar-herder/server.scm index b1c85ef..30b8c8d 100644 --- a/nar-herder/server.scm +++ b/nar-herder/server.scm @@ -217,6 +217,10 @@ (response_code . ,response-code) ,@labels))) + (define loop-detections-metric + (make-counter-metric metrics-registry + "loop_detections_total")) + (define %compression-strings (map symbol->string %compression-options)) @@ -382,6 +386,7 @@ (assq-ref narinfo 'id))) (when loop? + (metric-increment loop-detections-metric) (log-msg logger 'WARN (request-method request) " " |