diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-05-21 09:27:15 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-05-21 09:27:15 (GMT) |
commit | be69161b43b17e927e43700624f8c3ce780e3253 (patch) | |
tree | afc89006f3988a24590c5ae650312ddb2bbf5231 /tests | |
parent | 1ac9419646cfa6a09fc0833febd11a0692bca193 (diff) | |
download | tcl-be69161b43b17e927e43700624f8c3ce780e3253.zip tcl-be69161b43b17e927e43700624f8c3ce780e3253.tar.gz tcl-be69161b43b17e927e43700624f8c3ce780e3253.tar.bz2 |
Proposed solution for 3613609: lsort -nocase does not sort non-ASCII correctly
Diffstat (limited to 'tests')
-rw-r--r-- | tests/cmdIL.test | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/cmdIL.test b/tests/cmdIL.test index b387e71..c9a10b6 100644 --- a/tests/cmdIL.test +++ b/tests/cmdIL.test @@ -394,6 +394,9 @@ test cmdIL-4.34 {SortCompare procedure, -ascii option with -nocase option} { test cmdIL-4.35 {SortCompare procedure, -ascii option with -nocase option} { lsort -ascii -nocase {d E c B a D35 d300 100 20} } {100 20 a B c d d300 D35 E} +test cmdIL-4.36 {SortCompare procedure, UTF-8 with -nocase option} { + lsort -ascii -nocase [list \u101 \u100] +} [list \u101 \u100] test cmdIL-5.1 {lsort with list style index} { lsort -ascii -decreasing -index {0 1} { |