bad copy-paste

Author: MichaelChirico

inst/tests/tests.Rraw

@@ -20704,4 +20704,4 @@ DT = data.table(a=rep(1:3, 4), b=rep(1:2, 6))
 test(2301.1, DT[order(a, method="auto")], error="no support for sorting by method='auto'")
 test(2301.2, DT[order(a, b, decreasing=c(TRUE, FALSE))], DT[order(-a, b)])
 test(2301.3, DT[order(a, -b, decreasing=c(TRUE, TRUE))], error="Mixing '-' with vector decreasing")
-test(2301.4, DT[order(a, -b, decreasing=c(TRUE, TRUE, FALSE))], error="decreasing= has length 3")
+test(2301.4, DT[order(a, b, decreasing=c(TRUE, TRUE, FALSE))], error="decreasing= has length 3")