X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=directfifowatcher.ml;h=206ca53d54dd4502560dd1bbadc33cf8144c014f;hb=0a4a3a68d48188e50ae321557f4527a8dffaf73a;hp=8e8b4dcbd15f90ed38b88e12d1d38604208f94e6;hpb=da01b364b3c3e91a120037d2fcf0993bfbd26900;p=vsys.git

diff --git a/directfifowatcher.ml b/directfifowatcher.ml
index 8e8b4dc..206ca53 100644
--- a/directfifowatcher.ml
+++ b/directfifowatcher.ml
@@ -162,7 +162,8 @@ let sigchld_handle s =
             try
               let fqp_in,fd_out = Hashtbl.find pidmap pid in
                 begin
-                  reopenentry fqp_in
+                  reopenentry fqp_in;
+                  Hashtbl.remove pidmap pid
                 end
             with _ -> ()
           end;