Build documentation.

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

diff --git a/lib/diskimage_linux_swap.ml b/lib/diskimage_linux_swap.ml
index f4af9c2..8f15651 100644 (file)
--- a/lib/diskimage_linux_swap.ml
+++ b/lib/diskimage_linux_swap.ml
@@ -22,7 +22,9 @@
 
 open Diskimage_utils
 
-let probe_swap dev =
+let plugin_id = "linux_swap"
+
+let probe dev =
   (* Load the "superblock" (ie. first 0x1000 bytes). *)
   let bits = dev#read_bitstring 0L 0x1000 in
 
@@ -33,7 +35,7 @@ let probe_swap dev =
       "SWAPSPACE2" : 80 : string
     } ->
     {
-      fs_name = "Linux swap";
+      fs_plugin_id = plugin_id;
       fs_block_size = 4096L;           (* XXX *)
       fs_blocks_total = dev#size /^ 4096L;