From b74406a6251628254dd2f4000eec2f3ce2104293 Mon Sep 17 00:00:00 2001 From: Vincent Hanquez Date: Thu, 30 Jul 2009 14:41:12 +0100 Subject: [PATCH] remove newline when using debug. otherwise 2 newlines appears in the log --- common/dbus_server.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/common/dbus_server.ml b/common/dbus_server.ml index 9ec7e7b..24a5f94 100644 --- a/common/dbus_server.ml +++ b/common/dbus_server.ml @@ -139,12 +139,12 @@ type node = let apis = ref ([] : ((* node name *) string * node) list) let register_node name node = - debug "Registering node \"%s\" ...\n%!" name; + debug "Registering node %S ..." name; apis := (name, node) :: !apis let remove_node name = (* Remove child nodes as well. *) - debug "Removing node \"%s\" and its children...\n%!" name; + debug "Removing node %S and its children..." name; apis := List.filter (fun (n, _) -> not (String.startswith name n)) !apis let dispatch_get req node prop = -- 2.39.5