X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fdaemons%2Fuwobo%2Fuwobo.ml;h=167dc04f89d3978d52045779938f56fce9919e19;hb=57ae1762497a5f3ea75740e2908e04adb8642cc2;hp=e7aa1e8f9fc478d8589c3bf749f5a98aa1340280;hpb=9571f24af9d981219cac993604997f80bb2e1b97;p=helm.git

diff --git a/helm/software/daemons/uwobo/uwobo.ml b/helm/software/daemons/uwobo/uwobo.ml
index e7aa1e8f9..167dc04f8 100644
--- a/helm/software/daemons/uwobo/uwobo.ml
+++ b/helm/software/daemons/uwobo/uwobo.ml
@@ -481,7 +481,7 @@ let callback
         let xmluri = req#param "xmluri" in
         let keys = Pcre.split ~pat:"," (req#param "keys") in
         (* notation: "local" parameters are those defined on a per-stylesheet
-        pasis (i.e. param.key.param=value), "global" parameters are those
+        basis (i.e. param.key.param=value), "global" parameters are those
         defined for all stylesheets (i.e. param.param=value) *)
         let (user_params, props) = parse_apply_params req#params in
 	let profile_params =
@@ -803,7 +803,10 @@ let main () =
         let d_spec = Http_daemon.daemon_spec
             ~port ~mode:`Fork
             ~callback:(callback ~syslogger ~styles ~cmd_pipe ~res_pipe ())
-            ~auto_close:true ()
+            ~auto_close:true 
+(* FG: we set a timeout of 900 secs, which is the default of wget         *)
+(*   : 300 secs is too short for some proofs like pr0_confluence.con.body *)
+	    ~timeout:(Some 900) ()
         in
         Http_daemon.main d_spec
     | _ (* < 0 *) ->  (* fork failed :-((( *)