From d0f4189df89556ba7884b851556c07feac720424 Mon Sep 17 00:00:00 2001 From: Thomas Leonard Date: Fri, 1 Jan 2016 12:37:39 +0000 Subject: [PATCH] Turn off XenStore debug logging --- unikernel.ml | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/unikernel.ml b/unikernel.ml index a3305d0..f70382c 100644 --- a/unikernel.ml +++ b/unikernel.ml @@ -11,10 +11,7 @@ module Log = (val Logs.src_log src : Logs.LOG) let () = let open Logs in (* Set default log level *) - set_level (Some Logs.Info); - (* Debug-level logging for XenStore while tracking down occasional EACCES error. *) - Src.list () |> List.find (fun src -> Src.name src = "xenstore.client") |> fun xs -> - Src.set_level xs (Some Debug) + set_level (Some Logs.Info) module Main (Clock : V1.CLOCK) = struct module Log_reporter = Mirage_logs.Make(Clock)