X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=virt-df%2Fvirt_df_ext2.ml;h=2d1d1b892072de914210807c45e36608db1fccd2;hb=0bdb08c61ec66a16a81c2778a2a76cac77b08fda;hp=0ea8a258e116059d54cb02c706e100297594f28c;hpb=e6050cae9eee80791c3bb26f34c61f7dc89b142f;p=virt-top.git

diff --git a/virt-df/virt_df_ext2.ml b/virt-df/virt_df_ext2.ml
index 0ea8a25..2d1d1b8 100644
--- a/virt-df/virt_df_ext2.ml
+++ b/virt-df/virt_df_ext2.ml
@@ -27,7 +27,7 @@ open Virt_df
 
 let superblock_offset = 1024L
 
-let probe_ext2 (dev : device) =
+let probe_ext2 dev =
   (* Load the superblock. *)
   let bits = dev#read_bitstring superblock_offset 1024 in