X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=fdwatcher.ml;h=3453d54f78e16238dc93bb8d2addbcb074c2c80c;hb=f37863116494a4011988ad51100e6b956bcb4bd7;hp=eb9559ccec73b85185f8f716572b0908317eb43d;hpb=4bb506215c662d430a339b7a3d24db10d43de61b;p=vsys.git

diff --git a/fdwatcher.ml b/fdwatcher.ml
index eb9559c..3453d54 100644
--- a/fdwatcher.ml
+++ b/fdwatcher.ml
@@ -18,7 +18,7 @@ let add_fd (evpair:fname_and_fd) (fd_other:fname_and_fd) (callback:fname_and_fd-
 
 let del_fd fd =
   fdset:=List.filter (fun l->l<>fd) !fdset;
-  flush Pervasives.stdout
+  flush logfd
 
 let start_watch () =
     while (true)
@@ -31,4 +31,3 @@ let start_watch () =
                              let (func,(evd,fd_other)) = Hashtbl.find cbtable elt in
                                func evd fd_other) fds
     done
-