diff options
| -rwxr-xr-x | tests/sort/Test.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/tests/sort/Test.pm b/tests/sort/Test.pm index 965184ec5..3a5ff21ca 100755 --- a/tests/sort/Test.pm +++ b/tests/sort/Test.pm @@ -114,7 +114,10 @@ my @tv = ( ["11a", '-t: -k1,1b -k2,2', "a\t:a\na :b\n", "a\t:a\na :b\n", 0], ["11b", '-t: -k1,1b -k2,2', "a :b\na\t:a\n", "a\t:a\na :b\n", 0], ["11c", '-t: -k2,2b -k3,3', "z:a\t:a\na :b\n", "z:a\t:a\na :b\n", 0], -["11d", '-t: -k2,2b -k3,3', "z:a :b\na\t:a\n", "a\t:a\nz:a :b\n", 0], +# Before 1.22m, the first key comparison reported equality. +# With 1.22m, they compare different: "a" sorts before "a\n". +# And the second key spec isn't even used. +["11d", '-t: -k2,2b -k3,3', "z:a :b\na\t:a\n", "z:a :b\na\t:a\n", 0], # # Exercise bug re comparing `-' and integers. ["12a", '-n -t: +1', "a:1\nb:-\n", "b:-\na:1\n", 0], |