diff options
author | dgp <dgp@users.sourceforge.net> | 2014-08-02 00:06:21 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2014-08-02 00:06:21 (GMT) |
commit | 05ebf671c4c783977fe9da5d8782277d0855605b (patch) | |
tree | 126aad454d32d8118e562655eaae3045e2e36696 /library/platform/shell.tcl | |
parent | b86e4ae4f1c064097acc816bb6fa8c922ac200f0 (diff) | |
parent | 5a669c8fbb45b3321f07482c114152486d0600bf (diff) | |
download | tcl-05ebf671c4c783977fe9da5d8782277d0855605b.zip tcl-05ebf671c4c783977fe9da5d8782277d0855605b.tar.gz tcl-05ebf671c4c783977fe9da5d8782277d0855605b.tar.bz2 |
merge 8.5
Diffstat (limited to 'library/platform/shell.tcl')
-rw-r--r-- | library/platform/shell.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/library/platform/shell.tcl b/library/platform/shell.tcl index d37cdcd..6eb9691 100644 --- a/library/platform/shell.tcl +++ b/library/platform/shell.tcl @@ -187,7 +187,7 @@ proc ::platform::shell::TEMP {} { } } } - if {$channel != ""} { + if {$channel ne ""} { return -code error "Failed to open a temporary file: $channel" } else { return -code error "Failed to find an unused temporary file name" |