Browse files

More graceful handling of VM's that don't get created correctly.

  • Loading branch information...
1 parent 46b17dc commit 862c78ce640fd71ef308d0bd3e5fbc880eb08845 @Licenser Licenser committed Apr 4, 2013
Showing with 1 addition and 6 deletions.
  1. +1 −6 apps/chunter/src/chunter_vmadm.erl
View
7 apps/chunter/src/chunter_vmadm.erl
@@ -155,13 +155,8 @@ create(Data) ->
Res = case wait_for_tex(Port) of
ok ->
chunter_vm_fsm:load(UUID);
- {error, 1 = E} ->
- lager:error([{fifi_component, chunter}],
- "vmad:create - Failed: ~p.", [E]),
- chunter_vm_fsm:load(UUID);
{error, E} ->
- chunter_server:unprovision_memory(Mem*1024*1024),
-
+ delete(UUID, Mem*1024*1024),
lager:error([{fifi_component, chunter}],
"vmad:create - Failed: ~p.", [E]),
E

0 comments on commit 862c78c

Please sign in to comment.