From 30bc9db5cc0d1bc8cb118f846dfab7b9da01ce8d Mon Sep 17 00:00:00 2001
From: Hannes Mehnert <hannes@mehnert.org>
Date: Wed, 10 Apr 2024 11:43:04 +0200
Subject: [PATCH] update to mirage 4.5.0

---
 mirage-monitoring.opam   | 2 +-
 src/mirage_monitoring.ml | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/mirage-monitoring.opam b/mirage-monitoring.opam
index 29eac55..c0418a5 100644
--- a/mirage-monitoring.opam
+++ b/mirage-monitoring.opam
@@ -16,7 +16,7 @@ depends: [
   "metrics-influx" {>= "0.2.0"}
   "mirage-time" {>= "2.0.0"}
   "tcpip" {>= "7.0.0"}
-  "mirage-runtime" {>= "4.3.0"}
+  "mirage-runtime" {>= "4.5.0"}
   "memtrace-mirage" {>= "0.2.1.2.2"}
   "mirage-clock" {>= "4.0.0"}
 ]
diff --git a/src/mirage_monitoring.ml b/src/mirage_monitoring.ml
index 03cee92..e3c356b 100644
--- a/src/mirage_monitoring.ml
+++ b/src/mirage_monitoring.ml
@@ -95,7 +95,7 @@ let get_metrics s =
 let adjust_log_level s =
   let ts =
     List.map
-      (fun s -> (fst Mirage_runtime.Arg.log_threshold) s)
+      (fun s -> (fst Mirage_runtime.Conv.log_threshold) s)
       (String.split_on_char ',' s)
   in
   let* oks =