catch another weird edge case in _order_by

[scpubgit/Q-Branch.git] / lib / SQL / Abstract.pm

diff --git a/lib/SQL/Abstract.pm b/lib/SQL/Abstract.pm
index 08fcd3e..8745cc4 100644 (file)
--- a/lib/SQL/Abstract.pm
+++ b/lib/SQL/Abstract.pm
@@ -1130,6 +1130,8 @@ sub _order_by {
 
   my ($sql, @bind) = $self->_render_expr($expanded);
 
+  return '' unless length($sql);
+
   my $final_sql = $self->_sqlcase(' order by ').$sql;
 
   return wantarray ? ($final_sql, @bind) : $final_sql;