summaryrefslogtreecommitdiff
path: root/jim-exec.c
diff options
context:
space:
mode:
authorSteve Bennett <steveb@workware.net.au>2010-01-24 12:11:20 +1000
committerSteve Bennett <steveb@workware.net.au>2010-10-15 11:02:44 +1000
commit9652302fec62f76bf894c6b9eb849bda6994c293 (patch)
treeca40df6d8ea59c853066b7c5361238d8fdc6be49 /jim-exec.c
parenta7335808c5725934d81dbe68247b62a6ab08bf2f (diff)
Various general fixes and cleanups
Add lsearch -command, update case to use lsearch Rename tcl6.tcl to tclcompat.tcl Remove // style comments Expand some tabs to spaces Fix some compiler warnings Remove some unused functions Don't close fd=-1 in exec
Diffstat (limited to 'jim-exec.c')
-rw-r--r--jim-exec.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/jim-exec.c b/jim-exec.c
index fe53fd2..ba31e08 100644
--- a/jim-exec.c
+++ b/jim-exec.c
@@ -126,8 +126,8 @@ Jim_ExecCmd(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
if (result < 0) {
Jim_SetResultErrno(interp, "error reading from output pipe");
}
+ close(outputId);
}
- close(outputId);
if (Jim_CleanupChildren(interp, numPids, pidPtr, errorId) != JIM_OK) {
result = JIM_ERR;