X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F10test.t;h=736940c1d8fe03918538283efa094d50e29f4049;hb=b4085a1a3c815de38ac86ca9e0bab01110b48c7e;hp=213274067fa97c6592e7a1461a1ccd531292442c;hpb=b343752666c091274fe82eedeadcc39e64a7816c;p=scpubgit%2FQ-Branch.git

diff --git a/t/10test.t b/t/10test.t
index 2132740..736940c 100644
--- a/t/10test.t
+++ b/t/10test.t
@@ -618,6 +618,13 @@ my @sql_tests = (
         ],
       },
       {
+        equal => 1,
+        statements => [
+          q/ORDER BY name + ?, [me].[id]/,
+          q/ORDER BY name + ? ASC, [me].[id]/,
+        ],
+      },
+      {
         equal => 0,
         opts => { order_by_asc_significant => 1 },
         statements => [
@@ -964,7 +971,7 @@ use_ok('SQL::Abstract::Test', import => [qw(
   eq_sql_bind eq_sql eq_bind is_same_sql_bind
 )]);
 
-for my $test (@sql_tests) {
+for my $test ( @sql_tests ) {
 
   # this does not work on 5.8.8 and earlier :(
   #local @{*SQL::Abstract::Test::}{keys %{$test->{opts}}} = map { \$_ } values %{$test->{opts}}