summaryrefslogtreecommitdiffstats
path: root/unix
diff options
context:
space:
mode:
Diffstat (limited to 'unix')
-rw-r--r--unix/tclUnixPipe.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/unix/tclUnixPipe.c b/unix/tclUnixPipe.c
index 238801e..3db9228 100644
--- a/unix/tclUnixPipe.c
+++ b/unix/tclUnixPipe.c
@@ -10,7 +10,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclUnixPipe.c,v 1.5 1999/11/30 08:37:15 hobbs Exp $
+ * RCS: @(#) $Id: tclUnixPipe.c,v 1.6 1999/12/01 00:08:36 hobbs Exp $
*/
#include "tclInt.h"
@@ -776,7 +776,6 @@ PipeBlockModeProc(instanceData, mode)
if (fcntl(fd, F_SETFL, curStatus) < 0) {
return errno;
}
- curStatus = fcntl(fd, F_GETFL);
}
if (psPtr->outFile) {
fd = GetFd(psPtr->outFile);