summaryrefslogtreecommitdiffstats
path: root/tests/winFile.test
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2014-04-17 14:01:14 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2014-04-17 14:01:14 (GMT)
commita99f768a32b42d04735d090f7d6fd8a0f75bc8ec (patch)
tree939e5411d61efb088b50c96cdd7d5b9a44953be3 /tests/winFile.test
parentc37220bed3a6c2c42a369ca18cf216568a86b1c1 (diff)
downloadtcl-a99f768a32b42d04735d090f7d6fd8a0f75bc8ec.zip
tcl-a99f768a32b42d04735d090f7d6fd8a0f75bc8ec.tar.gz
tcl-a99f768a32b42d04735d090f7d6fd8a0f75bc8ec.tar.bz2
Remove all win95-specific test-cases, since Windows 95 is not supported any more.
Diffstat (limited to 'tests/winFile.test')
-rw-r--r--tests/winFile.test18
1 files changed, 0 insertions, 18 deletions
diff --git a/tests/winFile.test b/tests/winFile.test
index fba9bcb..2c47f5f 100644
--- a/tests/winFile.test
+++ b/tests/winFile.test
@@ -37,24 +37,6 @@ test winFile-1.2 {TclpGetUserHome} -constraints {win nt nonPortable} -body {
# The administrator account should always exist.
glob ~administrator
} -match glob -result *
-test winFile-1.3 {TclpGetUserHome} -constraints {win 95} -body {
- # Find some user in system.ini and then see if they have a home.
-
- set f [open $::env(windir)/system.ini]
- while {[gets $f line] >= 0} {
- if {$line ne {[Password Lists]}} {
- continue
- }
- gets $f
- set name [lindex [split [gets $f] =] 0]
- if {$name ne ""} {
- return [catch {glob ~$name}]
- }
- }
- return 0 ;# didn't find anything...
-} -cleanup {
- catch {close $f}
-} -result {0}
test winFile-1.4 {TclpGetUserHome} {win nt nonPortable} {
catch {glob ~stanton@workgroup}
} {0}