diff --git a/vendor/container-image/src/checkout.ml b/vendor/container-image/src/checkout.ml index 0d9c1437..d4c72e02 100644 --- a/vendor/container-image/src/checkout.ml +++ b/vendor/container-image/src/checkout.ml @@ -44,8 +44,12 @@ let checkout_layer ~sw ~cache layer dir = | _ -> Eio.Switch.run @@ fun sw -> let dst = - Eio.Path.open_out ~sw ~append:false ~create:(`If_missing file_mode) - path + try + Eio.Path.open_out ~sw ~append:false ~create:(`If_missing file_mode) + path + with exn -> + Logs.info (fun f -> f "Failed open %a with flags %o" Eio.Path.pp path file_mode); + raise exn in Eio.Flow.copy src dst; in