refactor(backend): try and fail if it can't remove KVM volumes

UPC · May 14, 2021 · 5271f22 · 5271f22
1 parent 636ba94
commit 5271f22
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/lib/Ravada/Domain/KVM.pm b/lib/Ravada/Domain/KVM.pm
@@ -238,11 +238,12 @@ sub _vol_remove {
                 if $@ !~ /libvirt error code: 50,/i;
             next;
         }
-        for ( ;; ) {
+        for ( 1 .. 3 ) {
             eval { $vol->delete() };
             last if !$@;
             sleep 1;
         }
+        die $@ if $@;
         eval { $pool->refresh };
         warn $@ if $@;
     }