require explicit nulls first/last

[dbsrgits/Data-Query.git] / lib / Data / Query / Renderer / SQL / Naive.pm

diff --git a/lib/Data/Query/Renderer/SQL/Naive.pm b/lib/Data/Query/Renderer/SQL/Naive.pm
index dbe4b80..a84981b 100644 (file)
--- a/lib/Data/Query/Renderer/SQL/Naive.pm
+++ b/lib/Data/Query/Renderer/SQL/Naive.pm
@@ -379,8 +379,8 @@ sub _order_chunk {
     ($dq->{reverse}
       ? $self->_format_keyword('DESC')
       : ()),
-    ($dq->{nulls}
-      ? $self->_format_keyword('NULLS '.('', qw(FIRST LAST))[$dq->{nulls}])
+    ($dq->{nulls} && $dq->{nulls} =~ /^(first|last)$/i
+      ? $self->_format_keyword('NULLS '.$dq->{nulls})
       : ()),
   );
 }