patch by Norbert BUCHMULLER (order_by => undef)

[scpubgit/Q-Branch.git] / t / 06order_by.t

diff --git a/t/06order_by.t b/t/06order_by.t
index 08477ec..1cf06c9 100644 (file)
--- a/t/06order_by.t
+++ b/t/06order_by.t
@@ -44,6 +44,11 @@ my @cases =
     expects => ' ORDER BY colA, colB DESC',
     expects_quoted => ' ORDER BY `colA`, `colB` DESC',
    },
+   {
+    given => undef,
+    expects => '',
+    expects_quoted => '',
+   },
   );
 
 my $sql  = SQL::Abstract->new;