On Mon, May 23, 2016 at 06:25:16PM +0200, Pino Toscano wrote: > diff --git a/mllib/common_utils.ml b/mllib/common_utils.ml > index d1aa8d2..0332510 100644 > --- a/mllib/common_utils.ml > +++ b/mllib/common_utils.ml > @@ -648,6 +648,16 @@ let compare_lvm2_uuids uuid1 uuid2 = > in > loop 0 0 > > +let stringify_args args = > + let args = Array.to_list args in > + let rec quote_args = function > + | [] -> "" > + | x :: xs -> " " ^ (Filename.quote x) ^ quote_args xs
Although this is just copied from the original code in dib/, you don't need the parens around `Filename.quote x' so you can remove those. Rich. -- Richard Jones, Virtualization Group, Red Hat http://people.redhat.com/~rjones Read my programming and virtualization blog: http://rwmj.wordpress.com Fedora Windows cross-compiler. Compile Windows programs, test, and build Windows installers. Over 100 libraries supported. http://fedoraproject.org/wiki/MinGW _______________________________________________ Libguestfs mailing list [email protected] https://www.redhat.com/mailman/listinfo/libguestfs
