From cb424f8f306872f6eeaabf4f9963c8c20784d099 Mon Sep 17 00:00:00 2001
From: Guilhem Moulin <guilhem@libreoffice.org>
Date: Wed, 2 Nov 2016 19:20:32 +0100
Subject: virsh-ga: pretty-print 'guest-info' response.

---
 virsh-ga | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'virsh-ga')

diff --git a/virsh-ga b/virsh-ga
index 6724298..d64983c 100755
--- a/virsh-ga
+++ b/virsh-ga
@@ -63,7 +63,8 @@ sub ga_send(@) {
 
 # the JSON domain definition can be found in QEMU's qga/qapi-schema.json
 if ($COMMAND eq 'info') {
-    ga_send(execute => 'guest-info');
+    my $r = ga_send(execute => 'guest-info');
+    print JSON->new->pretty->utf8->canonical->encode($r), "\n";
 }
 elsif ($COMMAND eq 'ping') {
     ga_send(execute => 'guest-ping');
-- 
cgit v1.2.3