X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=virt-top%2Fvirt_top_csv.ml;h=e048856518cd73e8732e0aef91378ef4999e59f9;hb=0a21f33ec73a9e10fd1f868dbb8796e6ab1e2a04;hp=8f8c45d8464ead7e24cb78afec51de519554480f;hpb=9bb5f67c0d8a6e8dad7de72e2488ee73c90f7d43;p=virt-top.git

diff --git a/virt-top/virt_top_csv.ml b/virt-top/virt_top_csv.ml
index 8f8c45d..e048856 100644
--- a/virt-top/virt_top_csv.ml
+++ b/virt-top/virt_top_csv.ml
@@ -1,5 +1,5 @@
 (* 'top'-like tool for libvirt domains.
-   (C) Copyright 2007 Richard W.M. Jones, Red Hat Inc.
+   (C) Copyright 2007-2009 Richard W.M. Jones, Red Hat Inc.
    http://libvirt.org/
 
    This program is free software; you can redistribute it and/or modify
@@ -19,6 +19,8 @@
    This file contains all code which requires CSV support.
 *)
 
+open Virt_top_gettext.Gettext
+
 (* Output channel, or None if CSV output not enabled. *)
 let chan = ref None ;;