X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=wrappers%2Fpl_LWP_UserAgent.ml;h=29fc7f4edfc5eb5dc08f4ef62fd1e6d6b7d08504;hb=9e88eacb7d2a8883900fba0c8abedc26c7510d98;hp=2a68f4a6dc28fe8e5175f5bd7485726a45876f62;hpb=918648a5563d9ae8e4079fdf7d364387b02b1b34;p=perl4caml.git diff --git a/wrappers/pl_LWP_UserAgent.ml b/wrappers/pl_LWP_UserAgent.ml index 2a68f4a..29fc7f4 100644 --- a/wrappers/pl_LWP_UserAgent.ml +++ b/wrappers/pl_LWP_UserAgent.ml @@ -1,6 +1,6 @@ (* Wrapper around Perl LWP::UserAgent class. * Copyright (C) 2003 Merjis Ltd. - * $Id: pl_LWP_UserAgent.ml,v 1.1 2003-10-12 17:33:15 rich Exp $ + * $Id: pl_LWP_UserAgent.ml,v 1.2 2003-10-15 16:51:12 rich Exp $ *) open Perl @@ -8,6 +8,8 @@ open Perl open Pl_HTTP_Request open Pl_HTTP_Response +let _ = eval "use LWP::UserAgent" + class lwp_useragent sv = object (self)