diff options
| -rw-r--r-- | tclcompat.tcl | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/tclcompat.tcl b/tclcompat.tcl index 3485d00..fb22190 100644 --- a/tclcompat.tcl +++ b/tclcompat.tcl @@ -137,9 +137,6 @@ proc popen {cmd {mode r}} { if {$cmd eq "pid"} { return $pids } - if {$cmd eq "getfd"} { - $f getfd - } if {$cmd eq "close"} { $f close # And wait for the child processes to complete |