diff options
| author | rmax <rmax> | 2004-11-25 11:31:30 (GMT) |
|---|---|---|
| committer | rmax <rmax> | 2004-11-25 11:31:30 (GMT) |
| commit | 5f80a835f062d49a8a1c829de7e649fc0c3b439a (patch) | |
| tree | 6ecd8ac3926b445ab63a41b0286d47595b34bf1a /tests/fCmd.test | |
| parent | 51720be334004d3e0c19d217e974419ec8342906 (diff) | |
| download | tcl-5f80a835f062d49a8a1c829de7e649fc0c3b439a.zip tcl-5f80a835f062d49a8a1c829de7e649fc0c3b439a.tar.gz tcl-5f80a835f062d49a8a1c829de7e649fc0c3b439a.tar.bz2 | |
* tests/tcltest.test: The order in which [glob] returns the file names
* tests/fCmd.test: is undefined, so tests should not depend on it.
Diffstat (limited to 'tests/fCmd.test')
| -rw-r--r-- | tests/fCmd.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/fCmd.test b/tests/fCmd.test index 6d3d059..bb94d42 100644 --- a/tests/fCmd.test +++ b/tests/fCmd.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: fCmd.test,v 1.26.2.5 2004/11/11 01:15:29 das Exp $ +# RCS: @(#) $Id: fCmd.test,v 1.26.2.6 2004/11/25 11:31:31 rmax Exp $ # if {[lsearch [namespace children] ::tcltest] == -1} { @@ -2373,10 +2373,10 @@ test fCmd-28.16 {file link: glob inside link} {linkDirectory} { cd [temporaryDirectory] file delete -force abc.link file link abc.link abc.dir - set res [glob -dir abc.link -tails *] + set res [lsort [glob -dir abc.link -tails *]] cd [workingDirectory] set res -} {abc.file abc2.file} +} [lsort [list abc.file abc2.file]] test fCmd-28.17 {file link: glob -type l} {linkDirectory} { cd [temporaryDirectory] |