X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=wrappers%2Fpl_HTML_Element.ml;h=0c59d9a25acf97582151dc55463cb3b13fa77302;hb=d4a13a071b6bf7a04a79fc3326175193f920aea3;hp=7c6f47085c4103e55d9e543d61388f988df176c8;hpb=9e543055271a1ec799d56f507ab048c78d3d7a88;p=perl4caml.git diff --git a/wrappers/pl_HTML_Element.ml b/wrappers/pl_HTML_Element.ml index 7c6f470..0c59d9a 100644 --- a/wrappers/pl_HTML_Element.ml +++ b/wrappers/pl_HTML_Element.ml @@ -1,10 +1,28 @@ -(* Wrapper around Perl HTML::Element class. - * Copyright (C) 2003 Merjis Ltd. - * $Id: pl_HTML_Element.ml,v 1.2 2003-10-14 16:05:22 rich Exp $ - *) +(** Wrapper around Perl [HTML::Element] class. *) +(* Copyright (C) 2003 Merjis Ltd. + + This library is free software; you can redistribute it and/or + modify it under the terms of the GNU Library General Public + License as published by the Free Software Foundation; either + version 2 of the License, or (at your option) any later version. + + This library 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 + Library General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this library; see the file COPYING. If not, write to + the Free Software Foundation, Inc., 59 Temple Place - Suite 330, + Boston, MA 02111-1307, USA. + + $Id: pl_HTML_Element.ml,v 1.5 2008-03-01 13:02:21 rich Exp $ + *) open Perl +let _ = eval "use HTML::Element" + type 'a content_t = Element of 'a | String of string class html_element sv =