[Libguestfs] [PATCH v2 10/13] resize: add function set_partition_bootable_and_id

[Richard W.M. Jones]

On Fri, Sep 19, 2014 at 03:39:12PM +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 3db9291..64697f9 100644
> --- a/resize/resize.ml
> +++ b/resize/resize.ml
> @@ -1151,8 +1151,7 @@ read the man page virt-resize(1).
>     * so that we can magically change the primary partition to an extended
>     * partition if necessary.
>     *)
> -  List.iter (
> -    fun p ->
> +  let set_partition_bootable_and_id p =
>        if p.p_bootable then
>          g#part_set_bootable "/dev/sdb" p.p_target_partnum true;
>  
> @@ -1168,7 +1167,8 @@ read the man page virt-resize(1).
>        | MBR, MBR_ID mbr_id ->
>          g#part_set_mbr_id "/dev/sdb" p.p_target_partnum mbr_id
>        | GPT, (No_ID|MBR_ID _) | MBR, (No_ID|GPT_Type _) -> ()
> -  ) partitions;
> +  in
> +  List.iter set_partition_bootable_and_id partitions;
>  
>    (* Fix the bootloader if we aligned the first partition. *)
>    if align_first_partition_and_fix_bootloader then (
> -- 
> 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-top is 'top' for virtual machines.  Tiny program with many
powerful monitoring features, net stats, disk stats, logging, etc.
http://people.redhat.com/~rjones/virt-top