# HG changeset patch # User Thomas Gazagnaire # Date 1260356736 0 # Node ID b8fefebee7bf9a9127b67af37e68741e72c35919 # Parent 5f26cdb61a6b90a1c4e8da3126ae6f01b1de7c44 [mq]: xenstore-do-not-log-enoent diff -r 5f26cdb61a6b -r b8fefebee7bf ocaml/xenstored/logging.ml --- a/ocaml/xenstored/logging.ml Wed Dec 09 10:52:47 2009 +0000 +++ b/ocaml/xenstored/logging.ml Wed Dec 09 11:05:36 2009 +0000 @@ -222,9 +222,12 @@ if !log_transaction_ops && tid <> 0 then write_access_log ~tid ~con (XbOp Xb.Op.Transaction_end) +let is_error_kind kind data = + Stringext.String.startswith kind data + let xb_answer ~tid ~con ~ty data = let print = match ty with - | Xb.Op.Error when data="ENOENT " -> !log_read_ops + | Xb.Op.Error when is_error_kind data "ENOENT" -> !log_read_ops | Xb.Op.Error -> !log_special_ops | Xb.Op.Watchevent -> true | _ -> false