diff options
| author | dgp <dgp@users.sourceforge.net> | 2019-11-03 02:17:02 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2019-11-03 02:17:02 (GMT) |
| commit | 0db44b051693cc2e28ad179970f04fd317259e90 (patch) | |
| tree | 9be62f2ed5223f06e47aeb350d338f65edc8e319 /tests/fileSystemEncoding.test | |
| parent | 8bc7833ed365e1fb5aca245e10ad0287b7d9551a (diff) | |
| download | tcl-0db44b051693cc2e28ad179970f04fd317259e90.zip tcl-0db44b051693cc2e28ad179970f04fd317259e90.tar.gz tcl-0db44b051693cc2e28ad179970f04fd317259e90.tar.bz2 | |
Fix test failures with -singleproc 1 testing
Diffstat (limited to 'tests/fileSystemEncoding.test')
| -rw-r--r-- | tests/fileSystemEncoding.test | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/fileSystemEncoding.test b/tests/fileSystemEncoding.test index 3679652..da301ce 100644 --- a/tests/fileSystemEncoding.test +++ b/tests/fileSystemEncoding.test @@ -38,11 +38,12 @@ namespace eval ::tcl::test::fileSystemEncoding { makeFile {} $utf8name set globbed [lindex [glob -directory $dir *] 0] encoding system utf-8 - lappend res [file exists $globbed] + set res [file exists $globbed] encoding system iso8859-1 lappend res [file exists $globbed] return $res } -cleanup { + removeFile $utf8name file delete -force $dir encoding system $saved } -result {0 1} |