From dfdb9843c2c24547c813436a6b580488a00e15b8 Mon Sep 17 00:00:00 2001 From: "Richard W.M. Jones" Date: Mon, 23 Sep 2013 21:37:06 +0100 Subject: [PATCH] libguestfs: Enable debugging. --- libguestfs_upstream.ml | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/libguestfs_upstream.ml b/libguestfs_upstream.ml index 825029a..8272fff 100644 --- a/libguestfs_upstream.ml +++ b/libguestfs_upstream.ml @@ -12,6 +12,11 @@ open Goaljobs open Printf open Config +(* Enable debugging. *) +let () = + Unix.putenv "LIBGUESTFS_DEBUG" "1"; + Unix.putenv "LIBGUESTFS_TRACE" "1" + let package = "libguestfs" (* Helper object which stores everything about a version. *) -- 1.8.3.1