From 13187c20428b720dee4cdf4282f53f7d4666c455 Mon Sep 17 00:00:00 2001
From: Claudio Sacerdoti Coen <claudio.sacerdoticoen@unibo.it>
Date: Tue, 30 May 2006 08:14:33 +0000
Subject: [PATCH] ZACK: ported to the latest ocaml-http API

---
 daemons/whelp/searchEngine.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/daemons/whelp/searchEngine.ml b/daemons/whelp/searchEngine.ml
index bb8c72297..e1e08bd4b 100644
--- a/daemons/whelp/searchEngine.ml
+++ b/daemons/whelp/searchEngine.ml
@@ -520,6 +520,7 @@ let _ =
   in
   restore_environment ();
   read_notation ();
-  Http_daemon.start' ~port (callback dbd);
+  let d_spec = Http_daemon.daemon_spec ~port ~callback:(callback dbd) () in
+  Http_daemon.main d_spec;
   printf "%s is terminating, bye!\n" daemon_name
 
-- 
2.39.2