Re: [Libguestfs] [PATCH v3 2/7] resize: simplify the code to filter parts

Signed-off-by: Hu Tao <hutao(a)cn.fujitsu.com&gt; --- resize/resize.ml | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) diff --git a/resize/resize.ml b/resize/resize.ml index 72c4da2..8f2105c 100644 --- a/resize/resize.ml +++ b/resize/resize.ml @@ -454,13 +454,8 @@ read the man page virt-resize(1). (* Filter out logical partitions. See note above. *) let parts = - match parttype with - | GPT -> parts - | MBR -> - List.filter (function - | { G.part_num = part_num } when part_num >= 5_l -> false - | _ -> true - ) parts in + List.filter (fun p -> parttype <> MBR || p.G.part_num <= 4_l) + parts in let partitions = List.map (