[Pkg-libvirt-commits] [libguestfs] 09/66: resize: add function copy_partition

[Hilko Bengen]

This is an automated email from the git hooks/post-receive script.

bengen pushed a commit to annotated tag debian/1%1.27.54-1
in repository libguestfs.

commit 51f67a9c81baf746dc9da1774521e53bb14c4853
Author: Hu Tao <hutao at cn.fujitsu.com>
Date:   Fri Sep 19 15:39:11 2014 +0800

    resize: add function copy_partition
    
    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 6bdf418..f235aad 100644
--- a/resize/resize.ml
+++ b/resize/resize.ml
@@ -1097,8 +1097,7 @@ read the man page virt-resize(1).
   ) partitions;
 
   (* Copy over the data. *)
-  List.iter (
-    fun p ->
+  let copy_partition p =
       match p.p_operation with
       | OpCopy | OpResize _ ->
         (* XXX Old code had 'when target_partnum > 0', but it appears
@@ -1132,7 +1131,8 @@ read the man page virt-resize(1).
            g#copy_device_to_device ~srcoffset ~size:copysize "/dev/sda" target
         )
       | OpIgnore | OpDelete -> ()
-  ) partitions;
+  in
+  List.iter copy_partition partitions;
 
   (* Set bootable and MBR IDs.  Do this *after* copying over the data,
    * so that we can magically change the primary partition to an extended

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-libvirt/libguestfs.git