summaryrefslogtreecommitdiff
path: root/sysutils/xentools411/patches/patch-tools_ocaml_xenstored_utils.ml
blob: e50135dba4120d298f9b684bbb078c7d874b5217 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
$NetBSD: patch-tools_ocaml_xenstored_utils.ml,v 1.2 2020/12/17 16:48:12 bouyer Exp $

--- tools/ocaml/xenstored/utils.ml.orig	2020-12-17 15:47:15.866790468 +0100
+++ tools/ocaml/xenstored/utils.ml	2020-12-17 15:53:47.618682147 +0100
@@ -86,7 +86,7 @@
 	let buf = Bytes.make 20 '\000' in
 	let sz = Unix.read fd buf 0 20 in
 	Unix.close fd;
-	int_of_string (Bytes.sub_string buf 0 sz)
+	int_of_string (String.trim (Bytes.sub_string buf 0 sz))
 
 (* @path may be guest data and needs its length validating.  @connection_path
  * is generated locally in xenstored and always of the form "/local/domain/$N/" *)