[Libguestfs] [PATCH v2 11/13] resize: add function expand_partition_content

Richard W.M. Jones rjones at redhat.com
Fri Sep 19 13:24:09 UTC 2014


On Fri, Sep 19, 2014 at 03:39:13PM +0800, Hu Tao wrote:
> Signed-off-by: Hu Tao <hutao at cn.fujitsu.com>
> ---
>  resize/resize.ml | 6 +++---
>  1 file changed, 3 insertions(+), 3 deletions(-)
> 
> diff --git a/resize/resize.ml b/resize/resize.ml
> index 64697f9..3290ba0 100644
> --- a/resize/resize.ml
> +++ b/resize/resize.ml
> @@ -1265,8 +1265,7 @@ read the man page virt-resize(1).
>      in
>  
>      (* Expand partition content as required. *)
> -    List.iter (
> -      function
> +    let expand_partition_content = function
>        | ({ p_operation = OpResize _ } as p)
>            when can_expand_content p.p_type ->
>            let source = p.p_name in
> @@ -1282,7 +1281,8 @@ read the man page virt-resize(1).
>            do_expand_content target meth
>        | { p_operation = (OpCopy | OpIgnore | OpDelete | OpResize _) }
>          -> ()
> -    ) partitions;
> +    in
> +    List.iter expand_partition_content partitions;
>  
>      (* Expand logical volume content as required. *)
>      List.iter (
> -- 
> 1.9.3

ACKed and pushed.

Rich.

-- 
Richard Jones, Virtualization Group, Red Hat http://people.redhat.com/~rjones
Read my programming and virtualization blog: http://rwmj.wordpress.com
virt-p2v converts physical machines to virtual machines.  Boot with a
live CD or over the network (PXE) and turn machines into KVM guests.
http://libguestfs.org/virt-v2v




More information about the Libguestfs mailing list