Changeset 14568 for trunk/base

Timestamp:

Oct 11, 2005, 9:26:21 PM (19 years ago)

Author:

jberry

Message:

Give the invoked editor standard input and output to play with.
This should fix problems with command line editors hanging.

File:

• trunk/base/src/port/port.tcl (modified) (2 diffs)

trunk/base/src/port/port.tcl

@@ -3 +3 @@
 exec @TCLSH@ "$0" "$@"
 # port.tcl
-# $Id: port.tcl,v 1.124 2005/10/11 20:39:03 jberry Exp $
+# $Id: port.tcl,v 1.125 2005/10/11 21:26:21 jberry Exp $
 #
 # Copyright (c) 2004 Robert Shaw <rshaw@opendarwin.org>
@@ -1758 +1758 @@
                                                         fatal "No EDITOR is specified in your environment"
                                                 } else {
-                                                        if {[catch {eval exec $editor $portfile} result]} {
+                                                        if {[catch {eval exec >/dev/stdout </dev/stdin $editor $portfile} result]} {
                                                                 global errorInfo
                                                                 ui_debug "$errorInfo"