Displaying 1 result from an estimated 1 matches for "13c18b2".
2016 Aug 08
1
[PATCH] sparsify, v2v: use Common_utils.absolute_path
...if not (Filename.is_relative disk) then disk
- else Sys.getcwd () // disk in
+ let disk_absolute = absolute_path disk in
(* The rest of virt-v2v doesn't actually work unless we detect
* the format of the input, so:
diff --git a/v2v/input_ova.ml b/v2v/input_ova.ml
index 13c18b2..d86c637 100644
--- a/v2v/input_ova.ml
+++ b/v2v/input_ova.ml
@@ -100,9 +100,7 @@ object
) in
(* Exploded path must be absolute (RHBZ#1155121). *)
- let exploded =
- if not (Filename.is_relative exploded) then exploded
- else Sys.getcwd () // exploded in
+ let exploded...