vm.delete() ok.

2014-02-06 12:18:52 +01:00 · 2014-02-06 12:18:52 +01:00 · ecfd05f788
commit ecfd05f788
parent 41585f1467
1 changed files with 8 additions and 7 deletions
--- a/src/api/vm.coffee
+++ b/src/api/vm.coffee
@ -243,15 +243,16 @@ exports.delete = ->

  xapi = @getXAPI VM

-  $each VM.$VBDs, (ref) ->
-    try
-      VBD = @getObject ref
-    catch
-      return
+  if deleteDisks
+    $each VM.$VBDs, (ref) =>
+      try
+        VBD = @getObject ref
+      catch e
+        return

-    return if VBD.read_only or not VBD.VDI?
+      return if VBD.read_only or not VBD.VDI?

-    xapi.call 'VDI.destroy', VBD.VDI
+      xapi.call 'VDI.destroy', VBD.VDI

  xapi.call 'VM.destroy', VM.ref