diff options
author | dgp <dgp@users.sourceforge.net> | 2018-10-17 16:03:54 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2018-10-17 16:03:54 (GMT) |
commit | ac4291f473c3967c6d9ee72d0076147c7a53d76f (patch) | |
tree | efb0ccfd8992c401f7b15fd2dfe702231563fd0b /tests/macOSXFCmd.test | |
parent | bbdb1f12a0518cfc2a81cd7ec057703ca92e0ffe (diff) | |
download | tcl-ac4291f473c3967c6d9ee72d0076147c7a53d76f.zip tcl-ac4291f473c3967c6d9ee72d0076147c7a53d76f.tar.gz tcl-ac4291f473c3967c6d9ee72d0076147c7a53d76f.tar.bz2 |
Backport test fix.
Diffstat (limited to 'tests/macOSXFCmd.test')
-rw-r--r-- | tests/macOSXFCmd.test | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/tests/macOSXFCmd.test b/tests/macOSXFCmd.test index 071f11b..132b2fe 100644 --- a/tests/macOSXFCmd.test +++ b/tests/macOSXFCmd.test @@ -151,16 +151,16 @@ test macOSXFCmd-4.1 {TclMacOSXMatchType} {macosxFileAttr notRoot} { file attributes dir.test -hidden 1 } set res [list \ - [catch {glob *.test} msg] $msg \ - [catch {glob -types FOOT *.test} msg] $msg \ - [catch {glob -types {{macintosh type FOOT}} *.test} msg] $msg \ - [catch {glob -types FOOTT *.test} msg] $msg \ - [catch {glob -types {{macintosh type FOOTT}} *.test} msg] $msg \ - [catch {glob -types {{macintosh type {}}} *.test} msg] $msg \ - [catch {glob -types {{macintosh creator FOOC}} *.test} msg] $msg \ - [catch {glob -types {{macintosh creator FOOC} {macintosh type FOOT}} *.test} msg] $msg \ - [catch {glob -types hidden *.test} msg] $msg \ - [catch {glob -types {hidden FOOT} *.test} msg] $msg \ + [catch {lsort [glob *.test]} msg] $msg \ + [catch {lsort [glob -types FOOT *.test]} msg] $msg \ + [catch {lsort [glob -types {{macintosh type FOOT}} *.test]} msg] $msg \ + [catch {lsort [glob -types FOOTT *.test]} msg] $msg \ + [catch {lsort [glob -types {{macintosh type FOOTT}} *.test]} msg] $msg \ + [catch {lsort [glob -types {{macintosh type {}}} *.test]} msg] $msg \ + [catch {lsort [glob -types {{macintosh creator FOOC}} *.test]} msg] $msg \ + [catch {lsort [glob -types {{macintosh creator FOOC} {macintosh type FOOT}} *.test]} msg] $msg \ + [catch {lsort [glob -types hidden *.test]} msg] $msg \ + [catch {lsort [glob -types {hidden FOOT} *.test]} msg] $msg \ ] cd .. file delete -force globtest |