search for: delete_norm

Displaying 1 result from an estimated 1 matches for "delete_norm".

Did you mean: delete_node
2010 Oct 11
1
[PATCH 1/2] Remove incompletely transferred libvirt volumes
...sub close delete($self->{fd}); } +sub DESTROY +{ + my $self = shift; + + # Check if the volume has been opened, but not closed + return unless (exists($self->{fd})); + + # Assume the volume is incomplete and delete it + $self->{vol}->delete(Sys::Virt::StorageVol::DELETE_NORMAL); +} + package Sys::VirtV2V::Target::LibVirt; use Sys::Virt; -- 1.7.2.3