(no commit message)

[vsys.git] / dirwatcher.ml

diff --git a/dirwatcher.ml b/dirwatcher.ml
index 918a06a..67a8c92 100644 (file)
--- 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