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 | f193acf08ce4f3fe6db1cb79ab3589d037e5853c (patch) | |
tree | afc89006f3988a24590c5ae650312ddb2bbf5231 /tests/cmdIL.test | |
parent | bf486a2007f9d3d45855d43e623ad85d29bcd0b7 (diff) | |
download | tcl-f193acf08ce4f3fe6db1cb79ab3589d037e5853c.zip tcl-f193acf08ce4f3fe6db1cb79ab3589d037e5853c.tar.gz tcl-f193acf08ce4f3fe6db1cb79ab3589d037e5853c.tar.bz2 |
Proposed solution for 3613609: lsort -nocase does not sort non-ASCII correctly
Diffstat (limited to 'tests/cmdIL.test')
-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} { |