Skip to content
Browse files

vert: add dumpxml

  • Loading branch information...
1 parent 09821fc commit 8f3e890e23c04e5a635ba2592573a823ffd2332d @msantos committed Aug 25, 2012
Showing with 8 additions and 0 deletions.
  1. +8 −0 bin/vert
View
8 bin/vert
@@ -74,6 +74,13 @@ call(["destroy", Host | Arg]) ->
{ok, Domain} = domain(Connect, Host),
rp(vert:virDomainDestroy(Domain));
+call(["dumpxml", Host | Arg]) ->
+ Opt = getopt(Arg),
+ Flags = proplists:get_value("flags", Opt, 0),
+ {ok, Connect} = connect(Opt),
+ {ok, Domain} = domain(Connect, Host),
+ rp(vert:virDomainGetXMLDesc(Domain, Flags));
+
call(["freecell" | Arg]) ->
Opt = getopt(Arg),
{ok, Connect} = connect(Opt),
@@ -193,6 +200,7 @@ call(_) ->
"create",
"define",
"destroy",
+ "dumpxml",
"freecell",
"hostname",
"list",

0 comments on commit 8f3e890

Please sign in to comment.
Something went wrong with that request. Please try again.