X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Fprocess-nt.c;h=9c0a4efae9192ae95f21b027f02df9f1029ce624;hp=2cf4b6829e44bd5fbe7641c64c7e9dcd55fd8091;hb=414b512c0774e67ba8e160b605447d862d3be166;hpb=21db8709c0c2dcedbd278c7fe571290d5ce80a71

diff --git a/src/process-nt.c b/src/process-nt.c
index 2cf4b68..9c0a4ef 100644
--- a/src/process-nt.c
+++ b/src/process-nt.c
@@ -642,6 +642,9 @@ static void
 nt_finalize_process_data (Lisp_Process *p, int for_disksave)
 {
   assert (!for_disksave);
+  /* If it's still in the list of processes we are waiting on delete
+     it.  */
+  mswindows_unwait_process (p);
   if (NT_DATA (p)->h_process)
     CloseHandle (NT_DATA (p)->h_process);
 }
@@ -1051,7 +1054,7 @@ nt_send_process (Lisp_Object proc, struct lstream* lstream)
 
       chunklen = Lstream_read (lstream, chunkbuf, 512);
       if (chunklen <= 0)
-	break; /* perhaps should abort() if < 0?
+	break; /* perhaps should ABORT() if < 0?
 		  This should never happen. */
 
       /* Lstream_write() will never successfully write less than the