X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2FDEVEL%2Focaml-http%2Fexamples%2Fwebfsd.ml;h=6babe3dde4abf2cc80bf46b9bd986111c5d6c01f;hb=1c7fb836e2af4f2f3d18afd0396701f2094265ff;hp=ef5c1cb0713872dfae68e0c9d1a375da2265379e;hpb=2f28bfb47f5fad6b3c5a705d9ede95700416dee8;p=helm.git

diff --git a/helm/DEVEL/ocaml-http/examples/webfsd.ml b/helm/DEVEL/ocaml-http/examples/webfsd.ml
index ef5c1cb07..6babe3dde 100644
--- a/helm/DEVEL/ocaml-http/examples/webfsd.ml
+++ b/helm/DEVEL/ocaml-http/examples/webfsd.ml
@@ -36,5 +36,5 @@ let argspec =
 in
 Arg.parse argspec (fun _ -> ()) "";
 Sys.chdir !root;
-Http.Daemon.Trivial.start ~addr:!addr ~port:!port ()
+Http_daemon.Trivial.start ~addr:!addr ~port:!port ()