diff options
-rw-r--r-- | nar-herder/server.scm | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/nar-herder/server.scm b/nar-herder/server.scm index 9e4c80a..a978ce2 100644 --- a/nar-herder/server.scm +++ b/nar-herder/server.scm @@ -611,6 +611,10 @@ #f) (download-database))))) + (let ((recent-changes-metric + (make-gauge-metric metrics-registry "recent_changes_limit"))) + (metric-set recent-changes-metric (assq-ref opts 'recent-changes-limit))) + (let* ((database (setup-database (assq-ref opts 'database) metrics-registry)) (canonical-storage (and=> (assq-ref opts 'storage) |