From: Sapan Bhatia <sapanb@cs.princeton.edu>
Date: Mon, 3 Mar 2008 23:19:42 +0000 (+0000)
Subject: (no commit message)
X-Git-Tag: vsys-0.7-4~19
X-Git-Url: http://git.onelab.eu/?p=vsys.git;a=commitdiff_plain;h=1a489047481c761be639e342c38326aeaca600f9

---

diff --git a/directfifowatcher.ml b/directfifowatcher.ml
index 7fa9192..29694ec 100644
--- a/directfifowatcher.ml
+++ b/directfifowatcher.ml
@@ -122,7 +122,6 @@ let sigchld_handle s =
   let pid,_=Unix.waitpid [Unix.WNOHANG] 0 in
     try
       let fqp_in = Hashtbl.find pidmap pid in
-        printf "Reopening fifo\n";flush Pervasives.stdout;
         reopenentry fqp_in
     with _ -> ()
 
diff --git a/dirwatcher.ml b/dirwatcher.ml
index 4131023..918a06a 100644
--- a/dirwatcher.ml
+++ b/dirwatcher.ml
@@ -69,7 +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
-                         printf "Received event: %s " dirname;
                          List.iter (fun l->printf "%s " (string_of_event l)) evlist;
                          printf "\n";flush Pervasives.stdout;
                          if (oneshot) then Hashtbl.remove wdmap wd;