Follower code now works

[virt-mem.git] / ifconfig / virt_ifconfig.ml

diff --git a/ifconfig/virt_ifconfig.ml b/ifconfig/virt_ifconfig.ml
index 4c4d3ec..b423fe3 100644 (file)
--- a/ifconfig/virt_ifconfig.ml
+++ b/ifconfig/virt_ifconfig.ml
@@ -23,6 +23,7 @@ open Virt_mem_gettext.Gettext
 open Virt_mem_utils
 open Virt_mem_types
 
+(*
 open Kernel_task_struct
 
 let run debug { domname = domname; mem = mem } { net_devices = net_devices } =
@@ -34,7 +35,9 @@ let run debug { domname = domname; mem = mem } { net_devices = net_devices } =
 
   List.iter (
     fun netdev ->
-      printf "%s\n" netdev.netdev_name
+      printf "%5s mtu %Ld\n"
+       netdev.netdev_name
+       netdev.netdev_mtu
   ) net_devices
 
 let summary = s_"list network interfaces in virtual machine"
@@ -44,3 +47,4 @@ virt-ifconfig prints a network interfaces for virtual machines.
 
 let () =
   Virt_mem.register "ifconfig" summary description ~needs_net_devices:true ~run
+*)