X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=dirwatcher.ml;fp=dirwatcher.ml;h=67a8c9263bba901f46a67f07e8622a404c34bed3;hb=f37863116494a4011988ad51100e6b956bcb4bd7;hp=918a06a352e2c0f72c70d43db4eec7d07b5b297e;hpb=1a489047481c761be639e342c38326aeaca600f9;p=vsys.git diff --git a/dirwatcher.ml b/dirwatcher.ml index 918a06a..67a8c92 100644 --- a/dirwatcher.ml +++ b/dirwatcher.ml @@ -69,8 +69,6 @@ let receive_event (eventdescriptor:fname_and_fd) (bla:fname_and_fd) = let (dirname,handler,oneshot) = try Hashtbl.find wdmap wd with Not_found->("",None,false) in - List.iter (fun l->printf "%s " (string_of_event l)) evlist; - printf "\n";flush Pervasives.stdout; if (oneshot) then Hashtbl.remove wdmap wd; ( match handler with