summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog5
-rw-r--r--tests/io.test7
2 files changed, 6 insertions, 6 deletions
diff --git a/ChangeLog b/ChangeLog
index 103ef78..cbc88be 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,10 @@
2003-03-06 Mo DeJong <mdejong@users.sourceforge.net>
+ * tests/io.test: Doh! Undo accidental commenting
+ out of a couple of tests.
+
+2003-03-06 Mo DeJong <mdejong@users.sourceforge.net>
+
* tests/io.test: Define a fileevent constraint and add
it to the constraint list of any test that depends
on the fileevent command. This is only useful to
diff --git a/tests/io.test b/tests/io.test
index 048530a..8f7452a 100644
--- a/tests/io.test
+++ b/tests/io.test
@@ -12,7 +12,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: io.test,v 1.43 2003/03/07 02:15:44 mdejong Exp $
+# RCS: @(#) $Id: io.test,v 1.44 2003/03/07 02:23:40 mdejong Exp $
if {[catch {package require tcltest 2}]} {
puts stderr "Skipping tests in [info script]. tcltest 2 required."
@@ -6558,8 +6558,6 @@ test io-52.8 {TclCopyChannel} {stdio openpipe} {
list $s0 [file size $path(test1)]
} {40 40}
-if 0 {
-
# Empty files, to register them with the test facility
set path(kyrillic.txt) [makeFile {} kyrillic.txt]
set path(utf8-fcopy.txt) [makeFile {} utf8-fcopy.txt]
@@ -6638,9 +6636,6 @@ test io-52.11 {TclCopyChannel & encodings} {
file size $path(kyrillic.txt)
} 3
-} ; # end koi-8 block
-
-
test io-53.1 {CopyData} {
removeFile test1
set f1 [open $thisScript]