X-Git-Url: http://git.annexia.org/?p=virt-top.git;a=blobdiff_plain;f=virt-top%2Fvirt_top_csv.ml;h=e048856518cd73e8732e0aef91378ef4999e59f9;hp=71bb79ee5c439ff3573df24e4737cb2786a8bbbf;hb=32a6888f045f64a3fb3423e21897977f9a839bf9;hpb=a8b837d5018c488a130fcbea425904817a862210 diff --git a/virt-top/virt_top_csv.ml b/virt-top/virt_top_csv.ml index 71bb79e..e048856 100644 --- a/virt-top/virt_top_csv.ml +++ b/virt-top/virt_top_csv.ml @@ -1,14 +1,25 @@ (* 'top'-like tool for libvirt domains. - * $Id: virt_top_csv.ml,v 1.1 2007/08/23 11:09:19 rjones Exp $ - * - * This file contains all code which requires CSV support. - *) + (C) Copyright 2007-2009 Richard W.M. Jones, Red Hat Inc. + http://libvirt.org/ -open ExtList + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 2 of the License, or + (at your option) any later version. -module C = Libvirt.Connect -module D = Libvirt.Domain -module N = Libvirt.Network + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + + 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 ;;