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

diff --git a/helm/DEVEL/ocaml-http/examples/timeout.ml b/helm/DEVEL/ocaml-http/examples/timeout.ml
index 56522f52d..eaa840778 100644
--- a/helm/DEVEL/ocaml-http/examples/timeout.ml
+++ b/helm/DEVEL/ocaml-http/examples/timeout.ml
@@ -23,5 +23,4 @@ let callback _ _ outchan =
   output_string outchan "Here you are!\n";
   flush outchan
 in
-Http.Daemon.start ~addr:"127.0.0.1" ~port:9999 ~timeout:(Some 10) callback
-
+Http_daemon.start ~port:9999 ~timeout:(Some 10) callback