Build documentation.

[virt-df.git] / lib / diskimage_lvm2.ml

diff --git a/lib/diskimage_lvm2.ml b/lib/diskimage_lvm2.ml
index f8ce5ec..e14c14e 100644 (file)
--- a/lib/diskimage_lvm2.ml
+++ b/lib/diskimage_lvm2.ml
@@ -26,7 +26,7 @@ open ExtList
 open Diskimage_utils
 open Diskimage_lvm2_metadata
 
-let plugin_name = "LVM2"
+let plugin_id = "LVM2"
 
 let sector_size = 512
 let sector_size64 = 512L
@@ -88,7 +88,7 @@ end
 
 (*----------------------------------------------------------------------*)
 (* Probe to see if it's an LVM2 PV. *)
-let rec probe_pv lvm_plugin_id dev =
+let rec probe lvm_plugin_id dev =
   try
     let uuid, _ = read_pv_label dev in
     if !debug then
@@ -173,7 +173,7 @@ and read_metadata dev offset32 len32 =
  * (as devices) and return them.  Note that we don't try to detect
  * what is on these LVs - that will be done in the main code.
  *)
-let rec list_lvs devs =
+let rec list devs =
   (* Read the UUID and metadata (again) from each device to end up with
    * an assoc list of PVs, keyed on the UUID.
    *)