X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=virt-ctrl%2Fvc_connections.ml;h=8f5fba05dbd63119f88abcd428c177a43f93a76e;hb=0bdb08c61ec66a16a81c2778a2a76cac77b08fda;hp=05024c53a9952651e6f41bf73167f5be98391efc;hpb=d7a277ed8a3312d927d712cb01807ea07d7b96ae;p=virt-top.git diff --git a/virt-ctrl/vc_connections.ml b/virt-ctrl/vc_connections.ml index 05024c5..8f5fba0 100644 --- a/virt-ctrl/vc_connections.ml +++ b/virt-ctrl/vc_connections.ml @@ -18,6 +18,7 @@ *) open Printf +open Virt_ctrl_gettext.Gettext module C = Libvirt.Connect module D = Libvirt.Domain @@ -401,11 +402,11 @@ let make_treeview ?packing () = view_col#set_sort_order sort_order; view_col#set_sort_column_id sort_column_id in - append_visible_column "ID" col_name_id (Some (false, `ASCENDING, 0)); - append_visible_column "Name" col_domname (Some (true, `ASCENDING, 1)); - append_visible_column "Status" col_status None; - append_visible_column "CPU" col_cpu None; - append_visible_column "Memory" col_mem None; + append_visible_column (s_ "ID") col_name_id (Some (false, `ASCENDING, 0)); + append_visible_column (s_ "Name") col_domname (Some (true, `ASCENDING, 1)); + append_visible_column (s_ "Status") col_status None; + append_visible_column (s_ "CPU") col_cpu None; + append_visible_column (s_ "Memory") col_mem None; let columns = col_name_id, col_domname, col_status, col_cpu, col_mem, col_id in