From: Sapan Bhatia <sapanb@cs.princeton.edu>
Date: Fri, 29 Feb 2008 19:41:02 +0000 (+0000)
Subject: (no commit message)
X-Git-Tag: vsys-0.7-4~29
X-Git-Url: http://git.onelab.eu/?p=vsys.git;a=commitdiff_plain;h=bf5113ed1eb16ce6e3be794d3e14da0b9d2222de

---

diff --git a/fifowatcher.ml b/fifowatcher.ml
index 6e2a12a..c26295f 100644
--- a/fifowatcher.ml
+++ b/fifowatcher.ml
@@ -70,7 +70,6 @@ and reopenentry_int fdin fifoin fifoout =
   @param outdescriptor Name of output pipe, out descriptor
   *)
 and receive_fifo_event eventdescriptor outdescriptor =
-  printf "received fifo event\n";flush Pervasives.stdout;
   let (evfname,evfd) = eventdescriptor in
   let (fname_other,fd_other) = outdescriptor in
   (* Open the output pipe, or use stdout instead *)
@@ -87,7 +86,6 @@ and receive_fifo_event eventdescriptor outdescriptor =
    If not, register it and start a new session.*)
   let pipe = try Hashtbl.find open_fds evfd with
     | Not_found ->
-        printf "fd not found!\n";flush Pervasives.stdout;
         (* Ok, need to launch script *)
         let execpath,slice_name = Hashtbl.find fdmap evfd in
         let (script_infd,pout) = Unix.pipe () in