From mboxrd@z Thu Jan  1 00:00:00 1970
From: ghouston@sourceware.cygnus.com
To: guile-cvs@sourceware.cygnus.com
Subject: guile/guile-core/ice-9 popen.scm
Date: Mon, 10 Apr 2000 14:55:00 -0000
Message-id: <20000410215553.25027.qmail@sourceware.cygnus.com>
X-SW-Source: 2000-q2/msg00044.html
List-Id: <guile-cvs.sourceware.org>

CVSROOT:	/cvs/guile
Module name:	guile
Changes by:	ghouston@sourceware.cygnus.com	00/04/10 14:55:53

Modified files:
	guile-core/ice-9: popen.scm 

Log message:
	* popen.scm (open-process): after forking, close all ports except
	the end of the pipe to the parent.  otherwise move->fdes and
	the exec'd program and the exit handlers can interfere with file
	descriptors still in use in parent ports.