From: Matt S Trout <mst@shadowcat.co.uk>
Date: Mon, 7 Oct 2013 12:25:13 +0000 (+0000)
Subject: fix stupid mistake in _extract_order_criteria
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=0f975d81695ec0e3e577fb4763efc520cc7b7f65;p=dbsrgits%2FDBIx-Class.git

fix stupid mistake in _extract_order_criteria
---

diff --git a/lib/DBIx/Class/Storage/DBIHacks.pm b/lib/DBIx/Class/Storage/DBIHacks.pm
index 70dbfae..f72c866 100644
--- a/lib/DBIx/Class/Storage/DBIHacks.pm
+++ b/lib/DBIx/Class/Storage/DBIHacks.pm
@@ -804,7 +804,7 @@ sub _extract_order_criteria {
   my $order_dq = $sql_maker->converter->_order_by_to_dq($order_by);
 
   my @by;
-  while (is_Literal($order_dq)) {
+  while (is_Order($order_dq)) {
     push @by, $order_dq->{by};
     $order_dq = $order_dq->{from};
   }