virsh-ga: pretty-print 'guest-info' response.

1 files changed, 2 insertions, 1 deletions

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');