Fix erroneous sort request in pltcl selftest.

diff --git a/src/pl/tcl/test/test.expected b/src/pl/tcl/test/test.expected
index d7037a1..cefeaf4 100644 (file)
--- a/src/pl/tcl/test/test.expected
+++ b/src/pl/tcl/test/test.expected
@@ -156,18 +156,18 @@ select 100 @< 4;
  f
 (1 row)
 
-select * from T_pkey1 order by key1, key2 using @<;
+select * from T_pkey1 order by key1 using @<, key2;
  key1 |         key2         |                   txt                    
 ------+----------------------+------------------------------------------
+    1 | KEY1-3               | should work                             
     1 | key1-1               | test key                                
     1 | key1-2               | test key                                
     1 | key1-3               | test key                                
-    1 | KEY1-3               | should work                             
     2 | key2-3               | test key                                
     2 | key2-9               | test key                                
 (6 rows)
 
-select * from T_pkey2 order by key1, key2 using @<;
+select * from T_pkey2 order by key1 using @<, key2;
  key1 |         key2         |                   txt                    
 ------+----------------------+------------------------------------------
     1 | KEY1-3               | test key                                

diff --git a/src/pl/tcl/test/test_queries.sql b/src/pl/tcl/test/test_queries.sql
index ba58476..98bc513 100644 (file)
--- a/src/pl/tcl/test/test_queries.sql
+++ b/src/pl/tcl/test/test_queries.sql
@@ -68,6 +68,6 @@ select tcl_sum(key1) from T_pkey1 where key1 = 99;
 select 1 @< 2;
 select 100 @< 4;
 
-select * from T_pkey1 order by key1, key2 using @<;
-select * from T_pkey2 order by key1, key2 using @<;
+select * from T_pkey1 order by key1 using @<, key2;
+select * from T_pkey2 order by key1 using @<, key2;