Convenience wrapper around virDomainCreate/2

msantos · Aug 16, 2012 · c44c041 · c44c041
1 parent 3663217
commit c44c041
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 3 deletions.
diff --git a/README.md b/README.md
@@ -55,7 +55,7 @@ To call the same functions in Erlang:
         {ok, Connect} = vert:virConnectOpen("qemu:///system"),
         {ok, XML} = file:read_file(Path),
         {ok, Domain} = vert:virDomainDefineXML(Connect, XML),
-        ok = vert:virDomainCreate(Domain, 0),
+        ok = vert:virDomainCreate(Domain),
 
         Active = vert:virConnectNumOfDomains(Connect),
         io:format("Active Domains: ~p~n", [Active]),

diff --git a/src/vert.erl b/src/vert.erl
@@ -86,7 +86,7 @@
         virDomainGetAutostart/1,
         virDomainDestroy/1,
         virDomainDefineXML/2,
-        virDomainCreate/2,
+        virDomainCreate/1, virDomainCreate/2,
         virDomainOpenConsole/2, virDomainOpenConsole/3,
         virConnectOpen/1,
         virConnectOpenReadOnly/1,
@@ -573,6 +573,8 @@ virDomainDefineXML(#resource{type = connect, res = Res}, Xml) when is_binary(Xml
 
 %virDomainCreateXML(Conn, XmlDesc, Flags) ->
 
+virDomainCreate(Domain) ->
+    virDomainCreate(Domain, 0).
 virDomainCreate(#resource{type = domain, res = Res}, Flags) when is_integer(Flags) ->
     ok(call(virDomainCreate, [Res, Flags])).
 

diff --git a/test/vert_tests.erl b/test/vert_tests.erl
@@ -62,7 +62,7 @@ create_test() ->
     {ok, XML} = file:read_file(Path),
 
     {ok, Domain} = vert:virDomainDefineXML(Connect, XML),
-    ok = vert:virDomainCreate(Domain, 0),
+    ok = vert:virDomainCreate(Domain),
 
     Active = vert:virConnectNumOfDomains(Connect),