diff options
| author | sebres <sebres@users.sourceforge.net> | 2022-09-06 09:04:18 (GMT) |
|---|---|---|
| committer | sebres <sebres@users.sourceforge.net> | 2022-09-06 09:04:18 (GMT) |
| commit | 67331f69a606991d6a166d2c722f61541a5561eb (patch) | |
| tree | 9f3f82969c5c223e88dd676311c11da4aebc4920 | |
| parent | 1197ccadc0ba24b8f5dc9debc59ca25593067f64 (diff) | |
| download | tcl-67331f69a606991d6a166d2c722f61541a5561eb.zip tcl-67331f69a606991d6a166d2c722f61541a5561eb.tar.gz tcl-67331f69a606991d6a166d2c722f61541a5561eb.tar.bz2 | |
amend to [55a02f20ec]: fixes test env-9.1 for not windows - USERPROFILE is not set under unix, and win constraint isn't effective yet since it'll be supplied to test as argument in global scope (check moved to test now)
| -rw-r--r-- | tests/env.test | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/tests/env.test b/tests/env.test index ea58b26..25367c3 100644 --- a/tests/env.test +++ b/tests/env.test @@ -453,8 +453,10 @@ test env-9.1 { flush $pipe set result [gets $pipe] close $pipe - set result -} -result $::env(USERPROFILE) + if {$result ne $::env(USERPROFILE)} { + list ERROR $result ne $::env(USERPROFILE) + } +} -result {} |