Git-Mirrors/qubes-mirage-firewall
1
0
Fork 0
mirror of https://github.com/mirage/qubes-mirage-firewall.git synced 2025-08-10 23:50:34 -04:00
Code Issues Projects Releases Packages Wiki Activity

Remove XenStore debug code

Browse source 
Was causing a Not_found error when used with the released version of
XenStore, which doesn't provide a log.

Reported by Cyril Levis.
This commit is contained in:
Thomas Leonard 2016-01-16 20:12:58 +00:00
parent 987834f6a6
commit 6fd7b01c65
1 changed files with 1 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
unikernel.ml
View file

@ -11,10 +11,7 @@ module Log = (val Logs.src_log src : Logs.LOG)
let () = let () =
let open Logs in let open Logs in
(* Set default log level *) (* Set default log level *)
set_level (Some Logs.Info); 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)
module Main (Clock : V1.CLOCK) = struct module Main (Clock : V1.CLOCK) = struct
module Logs_reporter = Mirage_logs.Make(Clock) module Logs_reporter = Mirage_logs.Make(Clock)