We should be using the lowercase path. Prior to this patch
lc_basename was not actually lowercase.
Fixes commit f7249a0bccc43d5b5e11703ff432b0361b03292b.
---
v2v/windows_virtio.ml | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/v2v/windows_virtio.ml b/v2v/windows_virtio.ml
index d78bb0c..e63f39e 100644
--- a/v2v/windows_virtio.ml
+++ b/v2v/windows_virtio.ml
@@ -417,7 +417,7 @@ and virtio_iso_path_matches_guest_os path inspect =
* elements.
*)
let lc_path = String.lowercase_ascii path in
- let lc_basename = Filename.basename path in
+ let lc_basename = Filename.basename lc_path in
let extension =
match last_part_of lc_basename '.' with
--
2.5.0