X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=virt-p2v;h=67cd4cfa69cdb222491fce2c840d7784a720a666;hb=d9eeebe35bedea60b31d9a642c02fe0e203141d3;hp=954f0351023518db11aabe8527c8c9fbac996f61;hpb=190106170d7bccb5b52262a620ad4d504891624d;p=virt-p2v.git

diff --git a/virt-p2v b/virt-p2v
index 954f035..67cd4cf 100755
--- a/virt-p2v
+++ b/virt-p2v
@@ -689,7 +689,7 @@ let get_all_block_devices () =
   let devices = devices @ get "sd" filter in
 
   (* Search for cciss. *)
-  let rex = Pcre.regexp "^cciss!c(\\d)d(\\d)$" in
+  let rex = Pcre.regexp "^cciss!c(\\d+)d(\\d+)$" in
   let filter name =
     try
       let subs = Pcre.exec ~rex name in
@@ -2052,7 +2052,8 @@ let rec main ttyname =
 
       let () =
 	printf (f_ "\nSending /dev/%s (%.3f GB) to remote machine\n\n%!")
-	  origin_dev ((Int64.to_float size) /. (1024.*.1024.*.1024.)) in
+	  (dev_of_block_device origin_dev)
+	  ((Int64.to_float size) /. (1024.*.1024.*.1024.)) in
 
       (* Open the snapshot device. *)
       let fd = openfile ("/dev/mapper/" ^ snapshot_dev) [O_RDONLY] 0 in