diff options
| author | dkf <dkf@noemail.net> | 2004-10-31 17:38:23 (GMT) |
|---|---|---|
| committer | dkf <dkf@noemail.net> | 2004-10-31 17:38:23 (GMT) |
| commit | a1e142014cbc7a8e2d509b45c5c7301da14b865d (patch) | |
| tree | 5007a497b67b4c904e91c8ca6a0a35f4ce3f8c62 /tests/cmdAH.test | |
| parent | 2f63913da2a9c126d07bc7d0d40d1d9833aea07b (diff) | |
| download | tcl-a1e142014cbc7a8e2d509b45c5c7301da14b865d.zip tcl-a1e142014cbc7a8e2d509b45c5c7301da14b865d.tar.gz tcl-a1e142014cbc7a8e2d509b45c5c7301da14b865d.tar.bz2 | |
Added constraint to test that won't ever work on Unix (no drive letters!)
FossilOrigin-Name: e591345f87c93bb02c325478d89cfe26a9273734
Diffstat (limited to 'tests/cmdAH.test')
| -rw-r--r-- | tests/cmdAH.test | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/cmdAH.test b/tests/cmdAH.test index e7e77a4..68593d5 100644 --- a/tests/cmdAH.test +++ b/tests/cmdAH.test @@ -10,7 +10,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: cmdAH.test,v 1.46 2004/10/31 17:07:12 dkf Exp $ +# RCS: @(#) $Id: cmdAH.test,v 1.47 2004/10/31 17:38:24 dkf Exp $ if {[lsearch [namespace children] ::tcltest] == -1} { package require tcltest 2.1 @@ -359,7 +359,7 @@ test cmdAH-8.44 {Tcl_FileObjCmd: dirname} testsetplatform { set result } {0 ~} test cmdAH-8.45 {Tcl_FileObjCmd: dirname} { - -constraints testsetplatform + -constraints {win testsetplatform} -match regexp -setup { set temp $::env(HOME) |