Split up huge Top module into smaller modules.

[virt-top.git] / src / opt_xml.ml

diff --git a/src/opt_xml.ml b/src/opt_xml.ml
index bb83780..1037b85 100644 (file)
--- a/src/opt_xml.ml
+++ b/src/opt_xml.ml
@@ -27,7 +27,7 @@ module C = Libvirt.Connect
 module D = Libvirt.Domain
 module N = Libvirt.Network ;;
 
-Top.parse_device_xml :=
+Collect.parse_device_xml :=
 fun id dom ->
   try
     let xml = D.get_xml_desc dom in