ORDER BY never generates ASC

diff --git a/lib/Data/Query/Renderer/SQL/Naive.pm b/lib/Data/Query/Renderer/SQL/Naive.pm
index c4ac4b3..42ee8b4 100644 (file)
--- a/lib/Data/Query/Renderer/SQL/Naive.pm
+++ b/lib/Data/Query/Renderer/SQL/Naive.pm
@@ -366,8 +366,8 @@ sub _render_order {
   my @ret = (
     $self->_format_keyword('ORDER BY'),
     $self->_render($dq->{by}),
-    (defined $dq->{reverse}
-      ? $self->_format_keyword($dq->{reverse} ? 'DESC' : 'ASC')
+    ($dq->{reverse}
+      ? $self->_format_keyword('DESC')
       : ())
   );
   my $from;
@@ -377,8 +377,8 @@ sub _render_order {
     push @ret, (
       ',',
       $self->_render($dq->{by}),
-      (exists $dq->{reverse}
-        ? $self->_format_keyword($dq->{reverse} ? 'DESC' : 'ASC')
+      ($dq->{reverse}
+        ? $self->_format_keyword('DESC')
         : ())
     );
   }