From 1a489047481c761be639e342c38326aeaca600f9 Mon Sep 17 00:00:00 2001
From: Sapan Bhatia <sapanb@cs.princeton.edu>
Date: Mon, 3 Mar 2008 23:19:42 +0000
Subject: [PATCH]

---
 directfifowatcher.ml | 1 -
 dirwatcher.ml        | 1 -
 2 files changed, 2 deletions(-)

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;
-- 
2.43.0